SPACE 1

home *** CD-ROM | disk | FTP | other *** search

/ SPACE 1 / SPACE - Library 1 - Volume 1.iso / games / 459 / hugecave.arc / HUGECAVE.CMD next >

Wrap

OS/2 REXX Batch file | 1991-01-28 | 106KB | 6,901 lines

COMMAND ANY FlagOFF 28 ;first turn of game only - initialize conditions SetVariableTo 8 500 SetVariableTo 9 0 ;set FEE FIE FOE FOO count to 0 TurnFlagON 23 SetVariableTo 5 10 SetVariableTo 6 5 SetVariableTo 7 0 SetVariableTo 1 0 END_COMMAND COMMAND ANY FlagOFF 28 ;first turn of game only - initialize conditions TurnFlagOFF 55 SetVariableTo 3 45 SetVariableTo 2 6 TurnFlagON 28 END_COMMAND COMMAND ANY RandomVariable 4 3 AddVariables 3 4 END_COMMAND COMMAND ANY VariableGT 3 59 SubtractFromVariable 3 60 AddToVariable 2 1 ; increase hour if minutes 60 or greater END_COMMAND COMMAND ANY VariableGT 2 12 SubtractFromVariable 2 12 ToggleFlag 55 END_COMMAND COMMAND ANY NOT AtLocation 54 TurnFlagOFF 5 END_COMMAND COMMAND ANY AtLocation 54 FlagOFF 5 FlagON 55 VariableGT 2 8 ; after 8:00 PM PrintMessage 2 BlankLine END_COMMAND COMMAND ANY AtLocation 54 FlagOFF 5 FlagOFF 55 VariableLT 2 6 ; before 6:00 AM PrintMessage 2 BlankLine END_COMMAND COMMAND ANY AtLocation 60 VariableEquals 3 0 PrintMessage 3 BlankLine END_COMMAND COMMAND ANY AtLocation 60 VariableEquals 3 15 OR VariableEquals 3 30 OR VariableEquals 3 45 PrintMessage 4 BlankLine END_COMMAND COMMAND ANY TurnFlagOFF 27 RoomNeedsLight TurnFlagON 27 END_COMMAND COMMAND ANY NOT Present 504 Destroy 504 ;causes dwarf not to get left in another room END_COMMAND COMMAND ANY TurnFlagOFF 31 Present 301 ;lamp - dwarf can only be seen in light Present 503 OR Present 504 TurnFlagON 31 END_COMMAND COMMAND ANY NewLife TurnFlagOFF 11 TurnFlagOFF 12 TurnFlagOFF 13 <--< Reset the vault Combination status END_COMMAND COMMAND ANY Present 300 CounterGT 5 20 number of turns a candle will last TurnCounterOFF 5 PrintMessage 600 BlankLine Destroy 300 VariableEquals 6 0 PrintMessage 175 BlankLine END_COMMAND COMMAND ANY FlagOFF 53 Chance 50 InRoom 325 NOT IsWearing 312 PrintMessage 5 BlankLine GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND ANY Chance 80 AtLocation 38 NOT InRoom 325 PutInCurrentRoom 325 PrintMessage 6 Blankline END_COMMAND COMMAND ANY NOT AtLocation 72 Present 352 SwapLocations 352 353 END_COMMAND COMMAND ANY AtLocation 296 VerbIsDirection PrintMessage 350 BlankLine END_COMMAND COMMAND ANY FlagOFF 53 AtLocationGT 63 ; in cold area of cave AtLocationLT 73 NOT IsWearing 344 (* NOT wearing parka *) AddToVariable 7 1 (* Increment count of turns player is cold *) VariableEquals 7 18 (* 18 turns without parka *) SetVariableTo 7 0 PrintMessage 7 MinusScore 10 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND ANY TurnFlagOFF 41 AtLocationLT 12 OR AtLocation 60 OR AtLocation 73 OR AtLocation 78 TurnFlagON 41 END_MESSAGE COMMAND ANY AtLocation 274 OR AtLocation 299 OR AtLocation 110 OR AtLocation 111 OR AtLocation 54 TurnFlagON 41 END_MESSAGE COMMAND ANY NOT IsWearing 444 FlagOFF 53 Chance 2 TurnsGT 200 FlagOFF 43 AtLocationGT 86 AtLocationLT 289 ;most of cave area FlagOFF 31 PrintMessage 8 TurnFlagON 43 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_MESSAGE COMMAND ANY NOT IsWearing 444 FlagOFF 53 Chance 2 TurnsGT 200 FlagOFF 52 AtLocationGT 86 AtLocationLT 289 ;most of cave area FlagOFF 31 PrintMessage 1 TurnFlagON 52 GoToRoom 50 BlankLine KillPlayer DoneWithTurn END_MESSAGE COMMAND ANY Chance 3 AtLocationGT 86 AtLocationLT 289 ;most of cave area FlagOFF 31 RandomMessage 9 17 BlankLine END_MESSAGE COMMAND ANY FlagOFF 53 FlagON 26 SubtractFromVariable 8 1 ;countdown to zero when batteries are dead END_COMMAND COMMAND ANY FlagON 26 VariableEquals 8 26 ;batteries almost dead Present 301 PrintMessage 368 BlankLine END_COMMAND COMMAND ANY FlagON 26 VariableLT 8 26 ;batteries almost dead VariableGT 8 0 Present 301 PrintMessage 18 BlankLine END_COMMAND COMMAND ANY VariableEquals 8 0 ;countdown to zero when batteries are dead Present 301 PrintMessage 599 TurnFlagOFF 26 SwapLocations 301 383 PrintMessage 369 GoToRoom 51 BlankLine DoneWithTurn END_COMMAND COMMAND ANY FlagOFF 26 FlagON 27 PrintMessage 303 NOT AtLocation 82 ;XYZZY location NOT AtLocation 269 ;PLUGH location NOT AtLocation 61 ;TURBO location Chance 25 PrintMessage 598 GoToRoom 98 MinusScore 10 ;lose 10 points for dying SendToRoom 383 60 Destroy 301 KillPlayer DoneWithTurn END_COMMAND COMMAND ANY Present 516 TurnFlagON 20 END_COMMAND COMMAND ANY IsSomewhere 516 FlagON 20 PutInCurrentRoom 516 VerbIsDirection (* moving to another location *) PrintMessage 19 BlankLine END_COMMAND COMMAND ANY Chance 20 Present 516 PrintMessage 20 BlankLine END_COMMAND COMMAND ANY Chance 5 AtLocationGT 86 AtLocationLT 289 ;most of cave area PrintMessage 597 BlankLine FlagON 32 FlagOFF 39 ;hasn't made both appearances IsNowhere 429 PrintMessage 370 BlankLine SendToRoom 429 205 TurnFlagON 39 ;pirate is now done END_COMMAND COMMAND ANY Chance 15 FlagOFF 32 AtLocationGT 86 AtLocationLT 289 ;most of cave area NOT AtLocation 171 NOT AtLocation 172 IsCarryingTreasure 5 ;carrying something worth more than 4 points PrintMessage 21 BlankLine TurnFlagON 32 SendTreasuresToRoom 205 5 END_COMMAND COMMAND ANY Chance 25 IsNowhere 412 AtLocationGT 86 AtLocationLT 289 ;most of cave area Present 301 ;lamp - dwarf can only be seen in light PrintMessage 22 PutInCurrentRoom 412 BlankLine LookAtRoom DoneWithTurn END_COMMAND COMMAND ANY FlagOFF 53 Chance 3 FlagOFF 31 AtLocationGT 86 AtLocationLT 289 ;most of cave area NOT AtLocation 61 Present 301 ;lamp - dwarf can only be seen in light PrintMessage 299 BlankLine PutInCurrentRoom 503 TurnFlagON 31 END_COMMAND COMMAND ANY FlagOFF 53 Chance 3 FlagOFF 31 AtLocationGT 86 AtLocationLT 289 ;most of cave area NOT AtLocation 61 Present 301 ;lamp - dwarf can only be seen in light PrintMessage 299 PutInCurrentRoom 504 BlankLine TurnFlagON 31 END_COMMAND COMMAND ANY VerbIsDirection ;player trying to move out of room Present 503 Present 301 ;lamp - dwarf can only be seen in light PrintMessage 596 DoneWithTurn END_COMMAND COMMAND ANY FlagON 31 Chance 34 Present 301 ;lamp - dwarf can only be seen in light TurnFlagON 30 also flag to indicate axe or knife is being thrown ;a knife is being thrown PrintMessage 595 BlankLine Chance 60 PrintMessage 594 TurnFlagOFF 30 also flag to indicate axe or knife is being thrown ;knife no longer being thrown BlankLine END_COMMAND COMMAND ANY FlagON 30 also flag to indicate axe or knife is being thrown ;knife was thrown IsWearing 444 PrintMessage 593 TurnFlagOFF 30 also flag to indicate axe or knife is being thrown ;knife no longer being thrown BlankLine END_COMMAND COMMAND ANY FlagON 30 also flag to indicate axe or knife is being thrown ;knife was thrown AND not wearing cloak PrintMessage 592 BlankLine TurnFlagOFF 30 also flag to indicate axe or knife is being thrown ;knife no longer being thrown MinusScore 10 ;lose 10 points for dying SendToRoom 383 60 Destroy 301 KillPlayer DoneWithTurn END_COMMAND COMMAND ANY FlagON 1 FlagOFF 24 ;cave still open FlagOFF 38 ;haven't starting to close yet SetVariableTo 10 11 ;10 turns until master game LockIt 384 CloseIt 384 Destroy 382 SendToRoom 395 95 SendToRoom 456 265 Destroy 396 ;phony bridge Destroy 418 Destroy 508 Destroy 417 END_COMMAND COMMAND ANY FlagON 1 FlagOFF 24 ;cave still open FlagOFF 38 ;haven't starting to close yet TurnFlagON 38 ;now we have SendToRoom 415 184 Destroy 509 Destroy 510 Destroy 511 PlusScore 40 PrintMessage 23 BlankLine END_COMMAND COMMAND ANY FlagON 38 SubtractFromVariable 10 1 VariableGT 10 0 VariableLT 10 9 PrintMessage 591 BlankLine END_COMMAND COMMAND ANY FlagON 38 VariableEquals 10 0 SendTreasuresToRoom 60 5 SendAllToRoom 0 ;destroy all other carried items GetIT 301 SetVariableTo 8 50 ;lamp will be on for 50 turns PrintMessage 24 BlankLine END_COMMAND COMMAND ANY FlagON 38 VariableEquals 10 0 TurnFlagON 24 RemoveEverything PlusScore 20 END_COMMAND COMMAND ANY FlagON 38 VariableEquals 10 0 GoToRoom 52 ChangePassageway 1 73 ChangePassageway 3 77 ChangePassageway 2 79 ChangePassageway 4 57 GoToRoom 289 DoneWithTurn END_COMMAND COMMAND ANY Chance 5 AtLocationGT 86 AtLocationLT 289 ;most of cave area FlagOFF 31 FlagON 42 FlagOFF 44 PrintMessage 25 BlankLine TurnFlagON 44 END_MESSAGE COMMAND ANY CounterGT 1 12 TurnFlagOFF 46 TurnCounterOFF 1 PrintMessage 26 BlankLine SendToRoom 485 251 ; mushroom grows back END_MESSAGE COMMAND ANY CounterGT 2 5 TurnFlagOFF 47 TurnCounterOFF 2 PrintMessage 33 Destroy 472 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND ANY CounterGT 2 0 PutInCurrentRoom 472 VerbIsDirection PrintMessage 34 BlankLine END_COMMAND COMMAND ANY CounterEquals 2 1 PrintMessage 28 BlankLine END_COMMAND COMMAND ANY CounterEquals 2 2 PrintMessage 29 BlankLine END_COMMAND COMMAND ANY CounterEquals 2 3 PrintMessage 30 BlankLine END_COMMAND COMMAND ANY CounterEquals 2 4 PrintMessage 31 BlankLine END_COMMAND COMMAND ANY CounterEquals 2 5 PrintMessage 32 BlankLine END_COMMAND COMMAND ANY Present 475 Chance 8 RandomMessage 35 44 BlankLine END_COMMAND COMMAND ANY AtLocation 245 PutInCurrentRoom 479 VariableEquals 11 1 PutInCurrentRoom 480 Destroy 479 GoToRoom 247 ChangePassageway 12 245 ChangePassageway 2 245 ChangePassageway 1 0 PutInCurrentRoom 477 Destroy 478 GoToRoom 245 END_COMMAND COMMAND ANY AtLocation 245 VariableEquals 11 2 PutInCurrentRoom 481 Destroy 479 END_COMMAND COMMAND ANY AtLocation 245 NOT VariableEquals 11 1 ChangePassageway 11 0 ChangePassageway 1 97 END_COMMAND COMMAND ANY AtLocation 246 PutInCurrentRoom 479 VariableEquals 11 1 PutInCurrentRoom 480 Destroy 479 GoToRoom 247 ChangePassageway 12 246 ChangePassageway 1 246 PutInCurrentRoom 478 Destroy 477 ChangePassageway 2 0 GoToRoom 246 END_COMMAND COMMAND ANY AtLocation 246 VariableEquals 11 2 PutInCurrentRoom 481 Destroy 479 END_COMMAND COMMAND ANY AtLocation 246 NOT VariableEquals 11 1 ChangePassageway 11 0 ChangePassageway 12 106 ChangePassageway 2 106 END_COMMAND COMMAND ANY CounterEquals 4 3 PrintMessage 590 BlankLine END_COMMAND COMMAND ANY CounterEquals 4 6 PrintMessage 589 BlankLine END_COMMAND COMMAND ANY CounterEquals 4 9 PrintMessage 588 BlankLine END_COMMAND COMMAND ANY CounterEquals 4 12 PrintMessage 587 BlankLine END_COMMAND COMMAND ANY CounterEquals 4 15 PrintMessage 586 BlankLine END_COMMAND COMMAND ANY CounterEquals 4 18 PrintMessage 45 BlankLine END_COMMAND COMMAND ANY CounterEquals 4 21 PrintMessage 585 BlankLine END_COMMAND COMMAND ANY CounterEquals 4 24 PrintMessage 46 BlankLine PutInCurrentRoom 515 END_COMMAND COMMAND ANY CounterGT 4 32 TurnCounterOFF 4 PrintMessage 47 Destroy 515 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND ANY CounterGT 4 24 PutInCurrentRoom 515 VerbIsDirection PrintMessage 48 BlankLine END_COMMAND COMMAND ANY CounterGT 4 24 NOT VerbIsDirection PrintMessage 49 BlankLine END_COMMAND COMMAND ANY CounterGT 3 5 TurnCounterOFF 3 END_COMMAND COMMAND ANY VerbIsDirection AtLocation 298 PrintMessage 50 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND ANY FlagON 22 PutInCurrentRoom 511 END_COMMAND COMMAND ANY AtLocation 269 Chance 25 PrintMessage 584 BlankLine END_COMMAND COMMAND ANY AtLocation 269 Chance 15 PrintMessage 583 BlankLine END_COMMAND COMMAND ANY NOT AtLocation 184 ;one side of troll bridge NOT AtLocation 187 ;other side Destroy 508 Destroy 418 TurnFlagOFF 25 ;troll can now appear when you try to cross bridge END_COMMAND COMMAND ANY NOT AtLocation 95 ;one side NOT AtLocation 265 ;other side Destroy 396 ;phony bridge END_COMMAND COMMAND ANY FlagOFF 33 AtLocation 76 OR AtLocation 77 TurnFlagON 33 PrintMessage 582 PromptForYes PrintMessage 366 PromptForYes TurnFlagON 30 also numerous temporary other uses ;hint has been rejected - so far PrintMessage 352 PrintMessage 298 PromptForYes TurnFlagOFF 30 also numerous temporary other uses ;hint has been accepted PrintMessage 321 MinusScore 5 DoneWithTurn END_COMMAND COMMAND ANY VerbIsDirection FlagON 22 PrintMessage 581 BlankLine END_COMMAND COMMAND ANY VerbIsDirection IsCarrying 398 PrintMessage 580 DoneWithTurn END_COMMAND COMMAND ANY VerbIsDirection IsCarrying 399 PrintMessage 579 DoneWithTurn END_COMMAND COMMAND ANY InRoom 507 VerbIsDirection PrintMessage 357 ;Dragon won't let you DoneWithTurn END_COMMAND COMMAND ANY AtLocation 179 VerbIsDirection PrintMessage 350 BlankLine END_COMMAND COMMAND NORTH Present 518 PrintMessage 578 DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 66 OR AtLocation 67 OR AtLocation 68 PrintMessage 416 BlankLine END_COMMAND COMMAND NORTH AtLocation 69 PrintMessage 417 BlankLine END_COMMAND COMMAND NORTH AtLocation 62 PrintMessage 420 DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 61 FlagOFF 36 ;programmer is not angry FlagOFF 37 ;programmer has not given his secret word TurnFlagON 37 PrintMessage 58 BlankLine GetIt 378 END_COMMAND COMMAND NORTH AtLocation 141 Chance 33 GoToRoom 146 DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 141 Chance 50 GoToRoom 147 DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 141 GoToRoom 148 DoneWithTurn END_COMMAND COMMAND NORTH InRoom 502 PrintMessage 73 DoneWithTurn END_COMMAND COMMAND NORTH InRoom 392 PrintMessage 347 PrintMessage 51 DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 110 PrintMessage 245 DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 114 NOT Present 379 PrintMessage 52 DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 114 Present 379 FlagON 22 PrintMessage 53 DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 114 Present 379 IsCarrying 487 PrintMessage 55 GoToRoom 115 BlankLine DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 114 Present 379 NOT IsCarrying 487 PrintMessage 54 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 117 Present 381 GoToRoom 104 DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 104 IsSomeWhere 371 GoToRoom 105 PrintMessage 56 BlankLine DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 245 Present 480 PrintMessage 383 DoneWithTurn END_COMMAND COMMAND NORTH AtLocation 259 PrintMessage 242 DoneWithTurn END_COMMAND COMMAND NORTH Present 517 PrintMessage 57 DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 65 PrintMessage 415 BlankLine END_COMMAND COMMAND SOUTH AtLocation 66 OR AtLocation 67 OR AtLocation 68 PrintMessage 414 BlankLine END_COMMAND COMMAND SOUTH InRoom 502 PrintMessage 73 DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 61 FlagOFF 36 ;programmer is not angry FlagOFF 37 ;programmer has not given his secret word TurnFlagON 37 PrintMessage 58 BlankLine GetIt 378 END_COMMAND COMMAND SOUTH AtLocation 111 Present 501 PrintMessage 232 SendToRoom 501 0 GoToRoom 110 BlankLine DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 111 NOT Present 501 PrintMessage 245 DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 115 NOT Present 380 PrintMessage 52 DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 115 Present 380 IsCarrying 487 NOT IsCarrying 471 PrintMessage 55 GoToRoom 114 BlankLine DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 115 Present 380 IsCarrying 487 IsCarrying 471 PrintMessage 59 GoToRoom 51 BlankLine KillPlayer Destroy 379 Destroy 380 DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 115 Present 380 NOT IsCarrying 487 PrintMessage 54 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 103 GoToRoom 206 PrintMessage 74 BlankLine DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 105 IsSomeWhere 371 IsCarrying 375 GoToRoom 104 SwapLocations 372 371 SwapLocations 374 373 PrintMessage 60 BlankLine DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 105 IsSomeWhere 371 NOT IsCarrying 375 GoToRoom 51 PrintMessage 61 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 246 Present 480 PrintMessage 383 DoneWithTurn END_COMMAND COMMAND SOUTH AtLocation 280 Present 489 PrintMessage 62 KillPlayer GoToRoom 51 BlankLine DoneWithTurn END_COMMAND COMMAND EAST AtLocation 296 FlagON 48 PrintMessage 63 GoToRoom 70 BlankLine DoneWithTurn END_COMMAND COMMAND EAST AtLocation 265 NOT InRoom 456 PrintMessage 336 DoneWithTurn END_COMMAND COMMAND EAST AtLocation 170 IsCarryingNothing GoToRoom 171 PrintMessage 322 BlankLine DoneWithTurn END_COMMAND COMMAND EAST AtLocation 170 IsCarryingSomething PrintMessage 349 DoneWithTurn END_COMMAND COMMAND EAST AtLocation 179 Chance 20 PrintMessage 63 BlankLine GoToRoom 177 BlankLine DoneWithTurn END_COMMAND COMMAND EAST AtLocation 242 FlagOFF 47 TurnFlagON 47 TurnCounterON 2 PrintMessage 27 PutInCurrentRoom 472 DoneWithTurn END_COMMAND COMMAND EAST AtLocation 258 GoToRoom 259 PrintMessage 74 BlankLine DoneWithTurn END_COMMAND COMMAND EAST AtLocation 283 CounterEquals 3 0 OR IsCarrying 398 OR IsCarrying 399 PrintMessage 64 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND EAST AtLocation 283 CounterGT 3 0 NOT IsCarrying 398 NOT IsCarrying 399 GoToRoom 284 BlankLine DoneWithTurn END_COMMAND COMMAND WEST AtLocation 45 OR AtLocation 46 OR AtLocation 47 BlankLine PrintMessage 577 GoToROOM 51 BlankLine DoneWithTurn END_COMMAND COMMAND WEST AtLocation 95 NOT InRoom 395 PrintMessage 336 DoneWithTurn END_COMMAND COMMAND WEST InRoom 502 PrintMessage 73 DoneWithTurn END_COMMAND COMMAND WEST AtLocation 171 IsCarrying 436 LoadWeightEquals 10 ;player can carry up to 10 treasures ;only carrying emerald PrintMessage 322 GoToRoom 170 BlankLine DoneWithTurn END_COMMAND COMMAND WEST AtLocation 171 IsCarryingNothing GoToRoom 170 PrintMessage 322 BlankLine DoneWithTurn END_COMMAND COMMAND WEST AtLocation 171 IsCarryingSomething PrintMessage 349 DoneWithTurn END_COMMAND COMMAND WEST AtLocation 284 CounterEquals 3 0 OR IsCarrying 398 OR IsCarrying 399 PrintMessage 64 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND WEST AtLocation 284 CounterGT 3 0 NOT IsCarrying 398 NOT IsCarrying 399 GoToRoom 283 BlankLine DoneWithTurn END_COMMAND COMMAND SOUTHWEST FlagOFF 21 ; Player has not gotten eggs back via magic words FlagOFF 38 ;Cave still open Present 418 AtLocation 187 ;one side of troll bridge GoToRoom 184 ;other side PutInCurrentRoom 418 PutInCurrentRoom 415 PrintMessage 320 DoneWithTurn END_COMMAND COMMAND SOUTHWEST FlagOFF 21 ; Player has not gotten eggs back via magic words FlagOFF 38 ;Cave still open AtLocation 187 ;one side of troll bridge InRoom 415 ;troll bridge NOT InRoom 508 FlagOFF 25 ;troll can now appear when you try to cross bridge PutInCurrentRoom 508 PrintMessage 300 DoneWithTurn END_COMMAND COMMAND SOUTHWEST FlagON 21 ; Player has got eggs back via magic words FlagOFF 38 ;Cave still open AtLocation 187 ;one side of troll bridge InRoom 415 ;troll bridge NOT InRoom 508 PrintMessage 65 TurnFlagOFF 22 SendToRoom 417 184 GoToRoom 98 MinusScore 10 KillPlayer DoneWithTurn END_COMMAND COMMAND SOUTHWEST FlagOFF 21 ; Player has not gotten eggs back via magic words FlagOFF 38 ;Cave still open AtLocation 187 ;one side of troll bridge InRoom 415 InRoom 508 PrintMessage 360 DoneWithTurn END_COMMAND COMMAND SOUTHWEST InRoom 415 FlagON 22 PrintMessage 362 Destroy 415 Destroy 508 Destroy 418 Destroy 511 TurnFlagOFF 22 SendToRoom 417 184 GoToRoom 98 MinusScore 10 SendToRoom 383 60 Destroy 301 KillPlayer DoneWithTurn END_COMMAND COMMAND SOUTHWEST AtLocation 214 Present 467 GoToRoom 215 DoneWithTurn END_COMMAND COMMAND NORTHWEST AtLocation 117 Present 381 GoToRoom 206 DoneWithTurn END_COMMAND COMMAND NORTHEAST AtLocation 117 Present 381 GoToRoom 239 DoneWithTurn END_COMMAND COMMAND NORTHEAST FlagOFF 21 ; Player has not gotten eggs back via magic words FlagOFF 38 AtLocation 184 ;one side of troll bridge InRoom 415 ;troll bridge FlagOFF 25 ;troll can now appear when you try to cross bridge NOT InRoom 508 PutInCurrentRoom 508 PrintMessage 300 DoneWithTurn END_COMMAND COMMAND NORTHEAST FlagOFF 21 ; Player has not gotten eggs back via magic words FlagOFF 38 AtLocation 184 ;one side of troll bridge InRoom 415 ;troll bridge InRoom 508 PrintMessage 360 DoneWithTurn END_COMMAND COMMAND NORTHEAST FlagOFF 38 ;Cave still open AtLocation 184 ;one side of troll bridge InRoom 417 PrintMessage 361 DoneWithTurn END_COMMAND COMMAND NORTHEAST FlagON 21 ; Player has got eggs back via magic words FlagOFF 38 ;Cave still open AtLocation 184 ;one side of troll bridge NOT InRoom 508 PrintMessage 65 TurnFlagOFF 22 SendToRoom 417 184 GoToRoom 98 MinusScore 10 KillPlayer DoneWithTurn END_COMMAND COMMAND NORTHEAST FlagOFF 21 ; Player has not gotten eggs back via magic words FlagOFF 38 ;Cave still open Present 418 AtLocation 184 ;one side of troll bridge GoToRoom 187 ;other side PutInCurrentRoom 418 PutInCurrentRoom 415 PrintMessage 320 DoneWithTurn END_COMMAND COMMAND UP AtLocation 37 IsCarrying 320 PrintMessage 66 DoneWithTurn END_COMMAND COMMAND UP AtLocation 41 BlankLine PrintMessage 576 BlankLine GoToROOM 51 DoneWithTurn END_COMMAND COMMAND UP AtLocation 62 IsSomeWhere 304 ; vault is open above GoToRoom 60 PrintMessage 418 DoneWithTurn END_COMMAND COMMAND UP AtLocation 62 NOT IsSomeWhere 304 ; vault is NOT open above PrintMessage 419 DoneWithTurn END_COMMAND COMMAND UP AtLocation 292 PrintMessage 575 DoneWithTurn END_COMMAND COMMAND UP AtLocation 294 PrintMessage 574 DoneWithTurn END_COMMAND COMMAND UP AtLocation 94 PrintMessage 67 GoToRoom 88 BlankLine DoneWithTurn END_COMMAND COMMAND UP AtLocation 141 PrintMessage 350 DoneWithTurn END_COMMAND COMMAND UP AtLocation 86 IsCarrying 424 PrintMessage 304 PrintMessage 573 DoneWithTurn END_COMMAND COMMAND UP AtLocation 80 IsOpen 384 GoToRoom 79 DoneWithTurn END_COMMAND COMMAND UP AtLocation 80 IsClosed 384 PrintMessage 351 DoneWithTurn END_COMMAND COMMAND UP AtLocation 245 Present 480 PrintMessage 383 DoneWithTurn END_COMMAND COMMAND UP AtLocation 259 PrintMessage 242 DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 43 BlankLine PrintMessage 572 BlankLine GoToROOM 51 DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 60 IsSomeWhere 304 ; vault is open above GoToRoom 62 PrintMessage 68 BlankLine DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 291 Present 497 FlagOFF 49 GoToRoom 292 PrintMessage 194 BlankLine DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 291 Present 497 FlagON 49 GoToRoom 293 PrintMessage 194 BlankLine DoneWithTurn END_COMMAND COMMAND DOWN Present 495 OR Present 496 PrintMessage 571 DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 293 NOT IsWearing 355 GoToRoom 51 PrintMessage 570 BlankLine DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 88 PrintMessage 69 BlankLine END_COMMAND COMMAND DOWN AtLocation 90 PrintMessage 70 BlankLine END_COMMAND COMMAND DOWN AtLocation 91 OR AtLocation 92 PrintMessage 71 BlankLine END_COMMAND COMMAND DOWN AtLocation 93 PrintMessage 72 BlankLine END_COMMAND COMMAND DOWN InRoom 502 PrintMessage 73 DoneWithTurn END_COMMAND COMMAND DOWN InRoom 410 PrintMessage 319 GoToRoom 264 BlankLine DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 79 IsOpen 384 GoToRoom 80 DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 103 GoToRoom 206 PrintMessage 74 BlankLine DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 258 GoToRoom 259 PrintMessage 74 BlankLine DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 299 PrintMessage 75 PromptForNO PrintMessage 569 DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 299 FlagON 46 ; player will not lose his stuff IsCarrying 301 PrintMessage 76 GoToRoom 111 PrintMessage 80 PlusScore 15 BlankLine DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 299 FlagON 46 ; player will not lose his stuff NOT IsCarrying 301 PrintMessage 78 GoToRoom 111 PrintMessage 80 PlusScore 15 BlankLine DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 299 FlagOFF 46 ; player will lose his stuff IsCarrying 301 SendAllToRoom 0 GetIt 301 ; Lamp is not lost PrintMessage 77 GoToRoom 111 BlankLine PrintMessage 80 BlankLine PlusScore 5 DoneWithTurn END_COMMAND COMMAND DOWN AtLocation 299 FlagOFF 46 ; player will lose his stuff NOT IsCarrying 301 SendAllToRoom 0 PrintMessage 79 GoToRoom 111 BlankLine PrintMessage 80 BlankLine PlusScore 5 DoneWithTurn END_COMMAND COMMAND EXIT AtLocation 242 FlagOFF 47 TurnFlagON 47 TurnCounterON 2 PrintMessage 27 PutInCurrentRoom 472 DoneWithTurn END_COMMAND COMMAND EXIT AtLocation 245 Present 480 PrintMessage 383 DoneWithTurn END_COMMAND COMMAND EXIT AtLocation 246 Present 480 PrintMessage 383 DoneWithTurn END_COMMAND COMMAND ENTER COFFIN InRoom 324 GoToRoom 37 PrintMessage 150 BlankLine DoneWithTurn END_COMMAND COMMAND ENTER DUCT AtLocation 64 Present 341 GoToRoom 65 BlankLine DoneWithTurn END_COMMAND COMMAND ENTER AtLocation 60 IsSomeWhere 304 ; vault is open above GoToRoom 62 PrintMessage 68 BlankLine DoneWithTurn END_COMMAND COMMAND ENTER AtLocation 79 IsOpen 384 GoToRoom 80 BlankLine DoneWithTurn END_COMMAND COMMAND ENTER AtLocation 245 Present 480 GoToRoom 247 PrintMessage 81 BlankLine DoneWithTurn END_COMMAND COMMAND ENTER AtLocation 245 NOT Present 480 PrintMessage 82 DoneWithTurn END_COMMAND COMMAND ENTER AtLocation 246 Present 480 GoToRoom 247 PrintMessage 81 BlankLine DoneWithTurn END_COMMAND COMMAND ENTER AtLocation 246 NOT Present 480 PrintMessage 82 DoneWithTurn END_COMMAND COMMAND MELENKURION AtLocation 289 ;playing "end game" TurnFlagOFF 50 ; i.e., "wrong" secret word END_COMMAND COMMAND MELENKURION AtLocation 117 NOT Present 381 PutInCurrentRoom 381 PrintMessage 83 PlusScore 15 DoneWithTurn END_COMMAND COMMAND MELENKURION Present 479 PrintMessage 382 SetVariableTo 11 2 ; safe is now fused shut TurnCounterON 4 DoneWithTurn END_COMMAND COMMAND MELENKURION PrintMessage 84 DoneWithTurn END_COMMAND COMMAND ZORTON Present 479 SetVariableTo 11 1 ; safe is now open PrintMessage 381 DoneWithTurn END_COMMAND COMMAND ZORTON AtLocation 289 ;playing "end game" TurnFlagON 50 END_COMMAND COMMAND ZORTON PrintMessage 84 DoneWithTurn END_COMMAND COMMAND THURB AtLocation 289 ;playing "end game" TurnFlagOFF 50 ; i.e., "wrong" secret word END_COMMAND COMMAND THURB Present 479 PrintMessage 382 SetVariableTo 11 2 ; safe is now fused shut TurnCounterON 4 DoneWithTurn END_COMMAND COMMAND THURB AtLocation 260 OR AtLocation 261 GoToRoom 258 PrintMessage 101 BlankLine DoneWithTurn END_COMMAND COMMAND THURB PrintMessage 84 DoneWithTurn END_COMMAND COMMAND TURBO AtLocation 289 ;playing "end game" TurnFlagOFF 50 ; i.e., "wrong" secret word END_COMMAND COMMAND TURBO Present 479 PrintMessage 382 SetVariableTo 11 2 ; safe is now fused shut TurnCounterON 4 DoneWithTurn END_COMMAND COMMAND TURBO FlagOFF 38 ;cave open FlagON 37 ;programmer has given secret word FlagOFF 36 ;programmer not angry AtLocation 61 PrintMessage 101 GoToRoom 60 BlankLine DoneWithTurn END_COMMAND COMMAND TURBO FlagOFF 38 ;cave open FlagON 37 ;programmer has given secret word FlagOFF 36 ;programmer not angry AtLocation 60 GoToRoom 61 PrintMessage 101 BlankLine DoneWithTurn END_COMMAND COMMAND TURBO FlagON 36 PrintMessage 375 DoneWithTurn END_COMMAND COMMAND TURBO PrintMessage 301 DoneWithTurn END_COMMAND COMMAND XYZZY AtLocation 289 ;playing "end game" FlagON 50 ; i.e., "right" previous secret word PrintMessage 101 GoToRoom 54 ; gets out of cylindrical chamber BlankLine DoneWithTurn END_COMMAND COMMAND XYZZY Present 479 PrintMessage 382 SetVariableTo 11 2 ; safe is now fused shut TurnCounterON 4 DoneWithTurn END_COMMAND COMMAND XYZZY FlagOFF 38 ;cave open AtLocation 82 ;XYZZY area PrintMessage 101 GoToRoom 60 BlankLine DoneWithTurn END_COMMAND COMMAND XYZZY FlagOFF 38 ;cave open AtLocation 60 PrintMessage 101 GoToRoom 82 ;XYZZY area BlankLine DoneWithTurn END_COMMAND COMMAND XYZZY PrintMessage 301 DoneWithTurn END_COMMAND COMMAND PHUGGG AtLocation 289 ;playing "end game" TurnFlagOFF 50 ; i.e., "wrong" secret word END_COMMAND COMMAND PHUGGG Present 479 PrintMessage 382 SetVariableTo 11 2 ; safe is now fused shut TurnCounterON 4 DoneWithTurn END_COMMAND COMMAND PHUGGG AtLocationLT 86 OR AtLocationGT 289 ;most of cave area PrintMessage 84 DoneWithTurn END_MESSAGE COMMAND PHUGGG Chance 85 FlagON 41 OR Present 402 PrintMessage 84 DoneWithTurn END_MESSAGE COMMAND PHUGGG Chance 90 FlagON 41 OR Present 402 PrintMessage 85 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_MESSAGE COMMAND PHUGGG FlagON 41 OR Present 402 PrintMessage 86 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_MESSAGE COMMAND PHUGGG Present 412 Destroy 412 PrintMessage 87 DoneWithTurn END_MESSAGE COMMAND PHUGGG Present 475 Destroy 475 PrintMessage 88 DoneWithTurn END_MESSAGE COMMAND PHUGGG FlagON 31 Chance 70 RandomMessage 89 93 Destroy 503 Destroy 504 DoneWithTurn END_COMMAND COMMAND PHUGGG FlagON 31 RandomMessage 94 98 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND PHUGGG PrintMessage 84 DoneWithTurn END_MESSAGE COMMAND SAMOHT AtLocation 289 ;playing "end game" TurnFlagOFF 50 ; i.e., "wrong" secret word END_COMMAND COMMAND SAMOHT Present 479 PrintMessage 382 SetVariableTo 11 2 ; safe is now fused shut TurnCounterON 4 DoneWithTurn END_COMMAND COMMAND SAMOHT PrintMessage 84 DoneWithTurn END_MESSAGE COMMAND NOSIDE AtLocation 289 ;playing "end game" TurnFlagOFF 50 ; i.e., "wrong" secret word END_COMMAND COMMAND NOSIDE SAMOHT NOT IsCarrying 301 PrintMessage 84 DoneWithTurn END_COMMAND COMMAND NOSIDE SAMOHT IsCarrying 301 VariableGT 8 25 PrintMessage 99 GoToRoom 51 BlankLine KillPlayer DoneWithTurn END_COMMAND COMMAND NOSIDE SAMOHT IsCarrying 301 AddToVariable 8 500 PrintMessage 100 DoneWithTurn END_COMMAND COMMAND NOSIDE Present 479 PrintMessage 382 SetVariableTo 11 2 ; safe is now fused shut TurnCounterON 4 DoneWithTurn END_COMMAND COMMAND NOSIDE PrintMessage 84 DoneWithTurn END_MESSAGE COMMAND PLUGH AtLocation 289 ;playing "end game" TurnFlagOFF 50 ; i.e., "wrong" secret word END_COMMAND COMMAND PLUGH FlagOFF 38 ;cave open FlagOFF 36 ;programmer not angry AtLocation 269 PrintMessage 101 GoToRoom 60 BlankLine DoneWithTurn END_COMMAND COMMAND PLUGH FlagOFF 38 ;cave open FlagOFF 36 ;programmer not angry AtLocation 60 PrintMessage 101 GoToRoom 269 BlankLine DoneWithTurn END_COMMAND COMMAND PLUGH FlagON 36 PrintMessage 375 DoneWithTurn END_COMMAND COMMAND PLUGH AtLocation 216 GoToRoom 298 PrintMessage 101 BlankLine DoneWithTurn END_COMMAND COMMAND PLUGH AtLocation 298 GoToRoom 216 PrintMessage 101 BlankLine DoneWithTurn END_COMMAND COMMAND PLUGH Present 479 PrintMessage 382 SetVariableTo 11 2 ; safe is now fused shut TurnCounterON 4 DoneWithTurn END_COMMAND COMMAND PLUGH PrintMessage 301 DoneWithTurn END_COMMAND COMMAND PLOVER AtLocation 289 ;playing "end game" TurnFlagOFF 50 ; i.e., "wrong" secret word END_COMMAND COMMAND PLOVER AtLocation 216 GoToRoom 298 PrintMessage 101 BlankLine DoneWithTurn END_COMMAND COMMAND PLOVER AtLocation 298 GoToRoom 216 PrintMessage 101 BlankLine DoneWithTurn END_COMMAND COMMAND PLOVER Present 479 PrintMessage 382 SetVariableTo 11 2 ; safe is now fused shut TurnCounterON 4 DoneWithTurn END_COMMAND COMMAND PLOVER FlagOFF 38 ;cave open AtLocation 171 NOT IsCarrying 436 PrintMessage 101 GoToRoom 269 BlankLine DoneWithTurn END_COMMAND COMMAND PLOVER FlagOFF 38 ;cave open AtLocation 171 IsCarrying 436 DropIt 436 PrintMessage 101 GoToRoom 269 BlankLine DoneWithTurn END_COMMAND COMMAND PLOVER FlagOFF 38 ;cave open AtLocation 269 PrintMessage 101 GoToRoom 171 BlankLine DoneWithTurn END_COMMAND COMMAND PLOVER AtLocation 172 OR AtLocation 170 GoToRoom 171 DoneWithTurn END_COMMAND COMMAND BUILDING AtLocation 57 OR AtLocation 73 OR AtLocation 78 OR AtLocation 160 PrintMessage 371 BlankLine GoToRoom 54 DoneWithTurn END_COMMAND COMMAND PLOVER PrintMessage 301 DoneWithTurn END_COMMAND COMMAND FOREST AtLocation 57 OR AtLocation 73 OR AtLocation 78 OR AtLocation 79 OR AtLocation 76 OR AtLocation 54 PrintMessage 371 BlankLine GoToRoom 77 DoneWithTurn END_COMMAND COMMAND FOREST PrintMessage 301 DoneWithTurn END_COMMAND COMMAND SLAB AtLocation 262 OR AtLocation 141 OR AtLocation 145 OR AtLocation 140 PrintMessage 371 BlankLine GoToRoom 144 DoneWithTurn END_COMMAND COMMAND STREAMBED AtLocation 57 OR AtLocation 73 OR AtLocation 54 OR AtLocation 79 OR AtLocation 76 PrintMessage 371 BlankLine GoToRoom 78 ;STREAMBED or SLIT DoneWithTurn END_COMMAND COMMAND SLAB PrintMessage 301 DoneWithTurn END_COMMAND COMMAND BEDQUILT AtLocation 269 OR AtLocation 272 OR AtLocation 275 OR AtLocation 140 OR AtLocation 148 PrintMessage 371 BlankLine GoToRoom 141 DoneWithTurn END_COMMAND COMMAND HILL AtLocation 78 OR AtLocation 73 OR AtLocation 54 OR AtLocation 79 PrintMessage 371 BlankLine GoToRoom 57 DoneWithTurn END_COMMAND COMMAND BEDQUILT PrintMessage 301 DoneWithTurn END_COMMAND COMMAND ORIENTAL AtLocation 142 OR AtLocation 148 OR AtLocation 169 PrintMessage 371 BlankLine GoToRoom 168 DoneWithTurn END_COMMAND COMMAND VALLEY AtLocation 57 OR AtLocation 54 OR AtLocation 79 OR AtLocation 78 PrintMessage 371 BlankLine GoToRoom 73 DoneWithTurn END_COMMAND COMMAND ORIENTAL PrintMessage 301 DoneWithTurn END_COMMAND COMMAND GIANT AtLocation 163 OR AtLocation 166 OR AtLocation 299 PrintMessage 371 BlankLine GoToRoom 165 DoneWithTurn END_COMMAND COMMAND BARREN AtLocation 187 OR AtLocation 188 OR AtLocation 189 OR AtLocation 192 OR AtLocation 193 PrintMessage 371 BlankLine GoToRoom 194 DoneWithTurn END_COMMAND COMMAND GIANT PrintMessage 301 DoneWithTurn END_COMMAND COMMAND SHELL AtLocation 140 OR AtLocation 173 OR AtLocation 175 OR AtLocation 176 PrintMessage 371 BlankLine GoToRoom 174 DoneWithTurn END_COMMAND COMMAND DEPRESSION AtLocation 57 OR AtLocation 54 OR AtLocation 73 OR AtLocation 78 PrintMessage 371 BlankLine GoToRoom 79 DoneWithTurn END_COMMAND COMMAND SHELL PrintMessage 301 DoneWithTurn END_COMMAND COMMAND SIT ANY PrintMessage 102 DoneWithTurn END_COMMAND COMMAND WASH URN FlagON 41 Present 314 NOT IsLocated 315 314 ; has taken ashes out SwapLocations 314 313 PrintMessage 103 DoneWithTurn END_COMMAND COMMAND WASH URN FlagOFF 41 Present 402 Present 314 NOT IsLocated 315 314 ; has taken ashes out SwapLocations 403 402 SwapLocations 314 313 PrintMessage 103 DoneWithTurn END_COMMAND COMMAND WASH URN FlagOn 41 Present 314 IsLocated 315 314 ; has NOT taken ashes out PrintMessage 104 DoneWithTurn END_COMMAND COMMAND WASH URN FlagOFF 41 Present 402 Present 314 IsLocated 315 314 ; has NOT taken ashes out Swaplocations 403 402 PrintMessage 104 DoneWithTurn END_COMMAND COMMAND WASH ANY PrintMessage 346 DoneWithTurn END_COMMAND COMMAND RUB FOOT Present 346 PrintMessage 105 DoneWithTurn END_COMMAND COMMAND RUB LAMP PrintMessage 106 DoneWithTurn END_COMMAND COMMAND TOUCH ANY AtLocation 61 TurnFlagOFF 37 ;revoke secret words TurnFlagON 36 PrintMessage 374 MinusScore 25 ;That will teach you GoToRoom 120 ;Pirate's maze - just south of Pirate's den DoneWithTurn END_COMMAND COMMAND RUB ANY PrintMessage 327 DoneWithTurn END_COMMAND COMMAND SEARCH THE DESK Present 349 (* Witt's desk is here *) NOUNIsNumber 349 (* Witt's desk was specified in input *) IsLocked 349 (* Witt's desk is locked *) PrintMessage 109 DoneWithTurn END_COMMAND COMMAND SEARCH THE DESK Present 349 (* Witt's desk is here *) NOUNIsNumber 349 (* Witt's desk was specified in input *) IsUnLocked 349 (* Witt's desk is unlocked *) OpenIt 349 (* Open Witt's desk -- first *) NOT SomethingInside 349 (* Witt's desk is empty. *) PrintMessage 110 DoneWithTurn END_COMMAND COMMAND SEARCH THE DESK Present 349 (* Witt's desk is here *) NOUNIsNumber 349 (* Witt's desk was specified in input *) IsUnLocked 349 (* Witt's desk is unlocked *) OpenIt 349 (* Open Witt's desk -- first *) SomethingInside 349 (* Witt's desk is NOT empty. *) PrintMessage 111 ShowContents 349 (* Display contents of Witt's desk *) DoneWithTurn END_COMMAND COMMAND SEARCH RIGHT POCKET Present 345 (* Right pocket of parka is here *) NOUNIsNumber 345 (* Right pocket of parka was specified in input *) OpenIt 345 (* Open right pocket -- first *) NOT SomethingInside 345 (* Right pocket is empty. *) PrintMessage 108 PrintMessage 110 DoneWithTurn END_COMMAND COMMAND SEARCH RIGHT POCKET Present 345 (* Right pocket of parka is here *) NOUNIsNumber 345 (* Right pocket of parka was specified in input *) OpenIt 345 (* Open right pocket -- first *) SomethingInside 345 (* Right pocket is NOT empty. *) PrintMessage 108 PrintMessage 111 ShowContents 345 (* Display contents of Right Pocket *) DoneWithTurn END_COMMAND COMMAND SEARCH LEFT POCKET Present 347 (* Left pocket of parka is here *) NOUNIsNumber 347 (* Left pocket of parka was specified in input *) OpenIt 347 (* Open left pocket -- first *) NOT SomethingInside 347 (* Left pocket is empty. *) PrintMessage 108 PrintMessage 110 DoneWithTurn END_COMMAND COMMAND SEARCH LEFT POCKET Present 347 (* Left pocket of parka is here *) NOUNIsNumber 347 (* Left pocket of parka was specified in input *) OpenIt 347 (* Open left pocket -- first *) SomethingInside 347 (* Left pocket is NOT empty. *) PrintMessage 108 PrintMessage 111 ShowContents 347 (* Display contents of Left Pocket *) DoneWithTurn END_COMMAND COMMAND FIND ANY FlagON 27 NOT Present 301 Chance 50 PrintMessage 113 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND FIND ANY FlagON 27 NOT Present 301 Chance 50 NOUNPresent PrintMessage 114 GetNOUN DoneWithTurn END_COMMAND COMMAND FIND ANY FlagON 27 NOT Present 301 PrintMessage 115 DoneWithTurn END_COMMAND COMMAND FIND KNIFE PrintMessage 348 DoneWithTurn END_COMMAND COMMAND FIND ANY NOUNIsCarrying PrintMessage 568 DoneWithTurn END_COMMAND COMMAND FIND ANY FlagON 24 PrintMessage 567 DoneWithTurn END_COMMAND COMMAND FIND DWARF FlagON 31 PrintMessage 334 DoneWithTurn END_COMMAND COMMAND FIND CAVE FlagOFF 33 ;hint has not been offered yet TurnFlagON 33 ;now it has PrintMessage 366 PromptForYes TurnFlagON 30 also numerous temporary other uses ;hint has been rejected - so far PrintMessage 352 PrintMessage 298 PromptForYes TurnFlagOFF 30 also numerous temporary other uses ;hint has been accepted PrintMessage 321 MinusScore 5 DoneWithTurn END_COMMAND COMMAND FIND CAVE FlagON 30 also numerous temporary other uses ;hint was rejected TurnFlagOFF 30 also numerous temporary other uses PrintMessage 332 DoneWithTurn END_COMMAND COMMAND FIND ANY PrintMessage 112 DoneWithTurn END_COMMAND COMMAND GET ANY FlagON 27 NOT Present 301 Chance 50 PrintMessage 113 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND GET TIME Present 305 ReDirectTo SAY TIME END_COMMAND COMMAND GET TIME Present 361 GetIt 361 PrintMessage 566 BlankLine ReDirectTo SAY TIME END_COMMAND COMMAND GET TIME NOT Present 361 NOT Present 305 PrintMessage 422 DoneWithTurn END_COMMAND COMMAND GET ANY FlagON 27 NOT Present 301 Chance 50 NOUNPresent PrintMessage 114 GetNOUN DoneWithTurn END_COMMAND COMMAND GET ANY FlagON 27 NOT Present 301 PrintMessage 115 DoneWithTurn END_COMMAND COMMAND GET FLOOR Present 332 AtLocation 63 IsNoWhere 337 PrintMessage 253 ChangePassageway 10 74 DropIt 337 DoneWithTurn END_COMMAND COMMAND GET ANY AtLocation 61 TurnFlagOFF 37 ;revoke secret words TurnFlagON 36 ;programmer is angry PrintMessage 374 MinusScore 25 ;That will teach you GoToRoom 120 ;Pirate's maze - just south of Pirate's den DoneWithTurn END_COMMAND COMMAND GET COBWEB NOUNinRoom (* cobwebs are here *) PrintMessage 116 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND GET ROPE AtLocation 44 OR AtLocation 40 BlankLine DescribeThing 327 DoneWithTurn END_COMMAND COMMAND GET CANE Present 518 PrintMessage 565 DoneWithTurn END_COMMAND COMMAND GET SHAFT PrintMessage 118 DoneWithTurn END_COMMAND COMMAND GET DUCT Present 340 PrintMessage 117 BlankLine GoToRoom 65 PlusScore 10 SwapLocations 340 341 DoneWithTurn END_COMMAND COMMAND GET COMPUTER AtLocation 63 OR AtLocation 72 PrintMessage 118 DoneWithTurn END_COMMAND COMMAND GET MIRROR PrintMessage 353 DoneWithTurn END_COMMAND COMMAND GET SIGN PrintMessage 118 DoneWithTurn END_COMMAND COMMAND GET TOAD Present 516 PrintMessage 118 DoneWithTurn END_COMMAND COMMAND GET KNIFE FlagON 31 PrintMessage 119 DoneWithTurn END_COMMAND COMMAND GET KNIFE PrintMessage 348 DoneWithTurn END_COMMAND COMMAND GET PLANT PrintMessage 564 DoneWithTurn END_COMMAND COMMAND GET BEAR InRoom 511 PrintMessage 120 TurnFlagON 22 DoneWithTurn END_COMMAND COMMAND GET BEAR AtLocation 194 PrintMessage 563 DoneWithTurn END_COMMAND COMMAND GET PITCHER IsCarrying 403 OR IsCarrying 402 PrintMessage 121 DoneWithTurn END_COMMAND COMMAND GET BOTTLE IsCarrying 307 OR IsCarrying 308 PrintMessage 121 DoneWithTurn END_COMMAND COMMAND GET WATER FlagON 23 Present 402 PrintMessage 342 DoneWithTurn END_COMMAND COMMAND GET WATER FlagON 9 Present 308 PrintMessage 342 DoneWithTurn END_COMMAND COMMAND GET WATER NOT Present 403 NOT Present 307 PrintMessage 341 DoneWithTurn END_COMMAND COMMAND GET WATER Present 403 NOT Present 307 FlagON 41 PrintMessage 344 SwapLocations 403 402 TurnFlagON 23 DoneWithTurn END_COMMAND COMMAND GET WATER NOT Present 403 Present 307 IsLocated 306 307 FlagON 41 PrintMessage 123 BlankLine SwapLocations 307 308 SendToRoom 309 308 PrintMessage 122 DoneWithTurn END_COMMAND COMMAND GET WATER NOT Present 403 Present 307 FlagON 41 PrintMessage 123 SwapLocations 307 308 TurnFlagON 9 DoneWithTurn END_COMMAND COMMAND GET WATER FlagOFF 41 Present 403 OR Present 307 PrintMessage 343 DoneWithTurn END_COMMAND COMMAND GET OIL FlagON 23 PrintMessage 342 DoneWithTurn END_COMMAND COMMAND GET OIL NOT Present 403 PrintMessage 341 DoneWithTurn END_COMMAND COMMAND GET OIL AtLocation 263 ;east pit of twopit room PrintMessage 345 SwapLocations 403 404 TurnFlagON 23 DoneWithTurn END_COMMAND COMMAND GET OIL Present 403 PrintMessage 343 DoneWithTurn END_COMMAND COMMAND GET BIRD InRoom 390 FlagOFF 34 ;first time tried to GET BIRD IsCarrying 386 PrintMessage 124 TurnFlagON 34 ;now has tried to GET BIRD once DoneWithTurn END_COMMAND COMMAND GET BIRD InRoom 390 FlagON 34 ;second time tried to GET BIRD IsCarrying 386 PrintMessage 125 TurnFlagOFF 34 ;toggle back to first response DoneWithTurn END_COMMAND COMMAND GET BIRD InRoom 390 NOT IsCarrying 385 PrintMessage 562 DoneWithTurn END_COMMAND COMMAND GET BIRD InRoom 390 IsCarrying 385 PrintMessage 561 SwapLocations 385 391 Destroy 390 DoneWithTurn END_COMMAND COMMAND GET CAGE Present 391 GetIt 391 PrintMessage 560 DoneWithTurn END_COMMAND COMMAND GET RUG Present 507 PrintMessage 357 DoneWithTurn END_COMMAND COMMAND GET AXE Present 507 InRoom 412 PrintMessage 357 DoneWithTurn END_COMMAND COMMAND GET AXE Present 509 InRoom 412 PrintMessage 304 DoneWithTurn END_COMMAND COMMAND GET VASE InRoom 434 GetIt 433 SwapLocations 394 434 PrintMessage 559 DoneWithTurn END_COMMAND COMMAND GET PILLOW InRoom 434 GetIt 394 Destroy 434 PutInCurrentRoom 435 PrintMessage 126 LookAtRoom DoneWithTurn END_COMMAND COMMAND GET ANY AtLocationGT 206 AtLocationLT 215 PrintMessage 127 DoneWithTurn END_COMMAND COMMAND GET SCEPTRE FlagOFF 46 ; player has normal strength Present 470 Destroy 470 GetIt 471 PrintMessage 129 DoneWithTurn END_MESSAGE COMMAND GET SCEPTRE FlagON 46 ; player has special strength Present 470 Destroy 470 GetIt 471 PlusScore 15 PrintMessage 128 DoneWithTurn END_MESSAGE COMMAND GET SWORD Present 474 FlagOFF 46 PrintMessage 131 DoneWithTurn END_COMMAND COMMAND GET SWORD Present 474 FlagON 46 PrintMessage 130 Destroy 474 GetIt 475 PlusScore 15 DoneWithTurn END_COMMAND COMMAND GET CROWN AtLocation 247 Present 483 Destroy 483 GetIt 482 PrintMessage 558 DoneWithTurn END_COMMAND COMMAND GET MUSHROOM Present 485 GetIt 484 Destroy 485 PrintMessage 557 DoneWithTurn END_COMMAND COMMAND PUT WATER ON URN ReDirectTo WASH URN END_COMMAND COMMAND PUT ROSE IN PITCHER Present 307 Present 306 SendToRoom 306 307 PrintMessage 556 DoneWithTurn END_COMMAND COMMAND PUT ROSE IN PITCHER Present 308 Present 306 Destroy 306 SendToRoom 309 308 PrintMessage 122 DoneWithTurn END_COMMAND COMMAND PUT ANY IN SAFE AtLocation 60 Present 304 NOUNPresent PrintMessage 135 SendNOUNToRoom 62 DoneWithTurn END_COMMAND COMMAND PUT FLASK IN PENTAGRAM AtLocation 100 Present 368 DropIt 370 Destroy 368 PrintMessage 145 DoneWithTurn END_COMMAND COMMAND PUT BIRD IN CAGE ReDirectTo GET BIRD END_COMMAND COMMAND PUT BIRD InRoom 390 PrintMessage 346 DoneWithTurn END_COMMAND COMMAND PUT ANY IN CAGE PrintMessage 132 DoneWithTurn END_COMMAND COMMAND PUT WATER IN BOTTLE ReDirectTo GET WATER END_COMMAND COMMAND PUT WATER IN PITCHER ReDirectTo GET WATER END_COMMAND COMMAND PUT OIL IN BOTTLE ReDirectTo GET OIL END_COMMAND COMMAND PUT OIL ReDirectTo POUR OIL END_COMMAND COMMAND PUT WATER ReDirectTo POUR WATER END_COMMAND COMMAND PUT COINS IN MACHINE InRoom 420 Present 428 PutInCurrentRoom 421 Destroy 428 PrintMessage 330 DoneWithTurn END_COMMAND COMMAND PUT BATTERIES IN LAMP Present 421 Present 383 OR Present 301 PutInCurrentRoom 422 PutInCurrentRoom 301 Destroy 383 Destroy 421 PrintMessage 312 SetVariableTo 8 500 ;new life in batteries TurnFlagON 26 LookAtRoom DoneWithTurn END_COMMAND COMMAND PUT BATTERIES IN LAMP NOT Present 421 PrintMessage 311 ;sorry, but you need fresh batteries DoneWithTurn END_COMMAND COMMAND NO PrintMessage 555 DoneWithTurn END_COMMAND COMMAND YES PrintMessage 554 DoneWithTurn END_COMMAND COMMAND DROP ALL AtLocation 247 OR AtLocation 60 PrintMessage 553 DoneWithTurn END_COMMAND COMMAND DROP ANY NOUNIsWearing GetNOUN END_COMMAND COMMAND DROP ANY IN SAFE AtLocation 60 Present 304 NOUNPresent PrintMessage 135 SendNOUNToRoom 62 DoneWithTurn END_COMMAND COMMAND DROP ANY AtLocation 60 NOUNPresent NOUNPointsGT 10 AddToVariable 1 1 END_COMMAND COMMAND DROP ANY AtLocation 60 NOUNPresent NOUNPointsGT 10 VariableEquals 1 37 SendNOUNToRoom 59 PrintMessage 134 BlankLine TurnFlagON 1 GoToRoom 96 DoneWithTurn END_COMMAND COMMAND DROP ANY AtLocation 60 NOUNIsCarrying NOUNPointsGT 10 PrintMessage 133 SendNOUNToRoom 59 DoneWithTurn END_COMMAND COMMAND DROP ANY AtLocation 247 NOUNPresent NOUNPointsGT 10 AddToVariable 1 1 END_COMMAND COMMAND DROP ANY AtLocation 247 NOUNPresent NOUNPointsGT 10 VariableEquals 1 37 SendNOUNToRoom 59 PrintMessage 134 BlankLine TurnFlagON 1 GoToRoom 96 DoneWithTurn END_COMMAND COMMAND DROP ANY AtLocation 247 NOUNIsCarrying NOUNPointsGT 10 PrintMessage 133 SendNOUNToRoom 59 DoneWithTurn END_COMMAND COMMAND INSERT CARD AtLocation 62 Present 378 PrintMessage 136 BlankLine GoToRoom 63 DoneWithTurn END_COMMAND COMMAND INSERT DISK AtLocation 63 OR AtLocation 72 Present 335 PrintMessage 256 BlankLine PrintMessage 384 PlusScore 10 DoneWithTurn END_COMMAND COMMAND DROP VIAL Present 486 Chance 10 PrintMessage 137 SendToRoom 486 0 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND DROP MAGAZINE AtLocation 179 Present 400 Destroy 400 PrintMessage 139 PlusScore 1 DoneWithTurn END_COMMAND COMMAND DROP OIL AtLocation 264 ;room with plant Present 404 SwapLocations 404 403 PrintMessage 552 TurnFlagOFF 23 DoneWithTurn END_COMMAND COMMAND DROP OIL InRoom 392 Present 404 SwapLocations 404 403 PrintMessage 140 SwapLocations 392 393 PlusScore 10 DoneWithTurn END_COMMAND COMMAND DROP OIL Present 404 SwapLocations 404 403 PrintMessage 328 PrintMessage 324 TurnFlagOFF 23 DoneWithTurn END_COMMAND COMMAND POUR WATER IsLocated 309 308 Present 308 SwapLocations 308 307 Destroy 309 PrintMessage 141 TurnFlagOFF 9 DoneWithTurn END_COMMAND COMMAND POUR WATER NOT IsLocated 309 308 Present 308 SwapLocations 308 307 PrintMessage 324 TurnFlagOFF 9 DoneWithTurn END_COMMAND COMMAND POUR WATER InRoom 408 Present 402 SwapLocations 402 403 PrintMessage 142 TurnFlagOFF 23 Destroy 408 Destroy 410 ;gigantic beanstalk in 163 MinusScore 15 DoneWithTurn END_COMMAND COMMAND POUR WATER InRoom 407 Present 402 SwapLocations 402 403 SwapLocations 408 407 SendToRoom 410 163 Destroy 409 PrintMessage 551 TurnFlagOFF 23 PlusScore 4 DoneWithTurn END_COMMAND COMMAND POUR WATER InRoom 406 Present 402 SwapLocations 402 403 SwapLocations 406 407 SendToRoom 409 262 PrintMessage 550 TurnFlagOFF 23 PlusScore 5 DoneWithTurn END_COMMAND COMMAND POUR WATER Present 402 SwapLocations 402 403 PrintMessage 328 PrintMessage 324 TurnFlagOFF 23 DoneWithTurn END_COMMAND COMMAND DROP VASE InRoom 394 Present 433 SwapLocations 394 434 Destroy 433 PrintMessage 373 PrintMessage 315 DoneWithTurn END_COMMAND COMMAND DROP VASE NOT InRoom 394 Present 433 Destroy 433 PutInCurrentRoom 435 PrintMessage 373 LookAtRoom DoneWithTurn END_COMMAND COMMAND DROP CAGE IsCarrying 391 DropIt 391 PrintMessage 143 DoneWithTurn END_COMMAND COMMAND INSERT COINS InRoom 420 Present 428 PutInCurrentRoom 421 Destroy 428 PrintMessage 330 DoneWithTurn END_COMMAND COMMAND INSERT BATTERIES Present 421 Present 383 OR Present 301 PutInCurrentRoom 422 PutInCurrentRoom 301 Destroy 383 Destroy 421 PrintMessage 312 SetVariableTo 8 500 ;new life in batteries TurnFlagON 26 LookAtRoom DoneWithTurn END_COMMAND COMMAND INSERT BATTERIES NOT Present 421 PrintMessage 311 ;sorry, but you need fresh batteries DoneWithTurn END_COMMAND COMMAND DROP ANY AtLocationGT 206 AtLocationLT 215 DestroyNOUN PrintMessage 549 DoneWithTurn END_COMMAND COMMAND DROP ANY NOUNPresent AtLocation 88 OR AtLocation 90 OR AtLocation 91 OR AtLocation 92 OR AtLocation 93 PrintMessage 144 SendNOUNToRoom 94 DoneWithTurn END_COMMAND COMMAND DROP FLASK AtLocation 100 Present 368 DropIt 370 Destroy 368 PrintMessage 145 DoneWithTurn END_COMMAND COMMAND RELEASE DJINN AtLocation 100 Present 500 PrintMessage 158 TurnFlagON 42 SendToRoom 500 0 DoneWithTurn END_COMMAND COMMAND RELEASE BEAR InRoom 508 Present 511 SwapLocations 508 418 ;troll is nowhere to be seen PrintMessage 363 TurnFlagON 25 TurnFlagOFF 22 PlusScore 10 DoneWithTurn END_COMMAND COMMAND RELEASE BEAR TurnFlagOFF 22 PrintMessage 146 END_COMMAND COMMAND RELEASE BIRD Present 391 InRoom 502 SwapLocations 385 391 PutInCurrentRoom 390 PrintMessage 331 Destroy 502 PrintMessage 306 PlusScore 10 DoneWithTurn END_COMMAND COMMAND RELEASE BIRD Present 391 InRoom 507 SwapLocations 385 391 Destroy 390 PrintMessage 358 DoneWithTurn END_COMMAND COMMAND RELEASE BIRD Present 391 InRoom 516 SwapLocations 385 391 Destroy 390 PrintMessage 147 DoneWithTurn END_COMMAND COMMAND RELEASE ANY PrintMessage 302 DoneWithTurn END_COMMAND COMMAND DRINK WATER FROM PITCHER Present 308 SwapLocations 308 307 PrintMessage 325 TurnFlagOFF 9 DoneWithTurn END_COMMAND COMMAND DRINK WATER FROM PITCHER IsLocated 309 308 Present 308 SwapLocations 308 307 Destroy 309 PrintMessage 325 BlankLine PrintMessage 148 TurnFlagOFF 9 DoneWithTurn END_COMMAND COMMAND DRINK WATER FROM BOTTLE Present 402 PrintMessage 325 PrintMessage 326 SwapLocations 403 402 TurnFlagOFF 23 DoneWithTurn END_COMMAND COMMAND DRINK AtLocation 291 PrintMessage 287 DoneWithTurn END_COMMAND COMMAND DRINK FlagON 41 PrintMessage 149 DoneWithTurn END_COMMAND COMMAND DRINK WATER Present 402 PrintMessage 325 PrintMessage 326 SwapLocations 403 402 TurnFlagOFF 23 DoneWithTurn END_COMMAND COMMAND DRINK ANY PrintMessage 346 DoneWithTurn END_COMMAND COMMAND GO DUCT AtLocation 64 Present 341 GoToRoom 65 DoneWithTurn END_COMMAND COMMAND GO COFFIN InRoom 324 GoToRoom 37 PrintMessage 150 DoneWithTurn END_COMMAND COMMAND GO LEDGE PrintMessage 151 DoneWithTurn (* no further action -- get next input *) END_COMMAND COMMAND SAY TIME FlagOFF 55 VariableLT 3 10 PrintMessage 425 DoneWithTurn END_COMMAND COMMAND SAY TIME FlagOFF 55 PrintMessage 423 DoneWithTurn END_COMMAND COMMAND SAY TIME FlagON 55 VariableLT 3 10 PrintMessage 426 DoneWithTurn END_COMMAND COMMAND SAY TIME FlagON 55 PrintMessage 424 DoneWithTurn END_COMMAND COMMAND SAY PrintMessage 548 DoneWithTurn END_COMMAND COMMAND QWERTY BlankLine PrintMessage 152 AskQuestion 2 TurnFlagON 54 BlankLine AnswerIsCorrect TurnFlagOFF 54 PrintMessage 153 TurnFlagON 53 DoneWithTurn END_COMMAND COMMAND QWERTY FlagON 54 TurnFlagOFF 54 PrintMessage 547 DoneWithTurn END_COMMAND COMMAND OPEN MAGAZINE Present 400 PrintMessage 546 BlankLine DoneWithTurn END_COMMAND COMMAND OPEN CLOCK Present 305 PrintMessage 545 BlankLine PrintMessage 544 BlankLine ReDirectTo SAY TIME END_COMMAND COMMAND OPEN COFFIN InRoom 316 (* closed coffin *) SwapLocations 316 324 PrintMessage 154 ChangePassageway 10 37 DoneWithTurn (* no further action -- get next input *) END_COMMAND COMMAND OPEN DESK Present 349 (* Witt's desk is here *) NOUNIsNumber 349 (* Witt's desk was specified in input *) IsLocked 349 (* Witt's desk is locked *) PrintMessage 107 DoneWithTurn END_COMMAND COMMAND OPEN DUCT Present 340 PrintMessage 117 BlankLine GoToRoom 65 PlusScore 10 SwapLocations 340 341 DoneWithTurn END_COMMAND COMMAND OPEN SAFE Present 303 <-- vault ready to be opened FlagOFF 15 ; player has not earned points yet TurnFlagON 15 ; player has now earned 15 points PlusScore 15 END_COMMAND COMMAND OPEN SAFE Present 303 <-- vault ready to be opened SwapLocations 303 304 <-- so do it PrintMessage 155 <-- and tell `em TurnFlagON 16 <-- turn temporary flag on SomethingInside 304 <-- if true TurnFlagOFF 16 <-- turn temporary flag off ShowContents 304 <-- and show `em what's there DoneWithTurn END_COMMAND COMMAND OPEN SAFE Present 304 <-- open vault is here FlagON 16 <-- program fell thru from above NOT SomethingInside 304 <-- verify that vault is really empty PrintMessage 543 TurnFlagOFF 16 <-- now turn temporary flag off DoneWithTurn END_COMMAND COMMAND OPEN SAFE Present 304 PrintMessage 164 DoneWithTurn END_COMMAND COMMAND OPEN GATE AtLocation 94 PrintMessage 542 DoneWithTurn END_COMMAND COMMAND OPEN VIAL Present 486 ReDirectTo BREAK VIAL END_COMMAND COMMAND OPEN FLASK AtLocation 100 InRoom 370 DropIt 369 SendToRoom 500 100 Destroy 370 PrintMessage 156 PlusScore 15 DoneWithTurn END_COMMAND COMMAND OPEN FLASK Present 368 DropIt 369 Destroy 368 PrintMessage 157 PlusScore 5 DoneWithTurn END_COMMAND COMMAND OPEN FLASK Present 369 PrintMessage 164 DoneWithTurn END_COMMAND COMMAND OPEN PENTAGRAM AtLocation 100 Present 500 PrintMessage 158 TurnFlagON 42 SendToRoom 500 0 DoneWithTurn END_COMMAND COMMAND OPEN PENTAGRAM AtLocation 100 NOT Present 500 PrintMessage 159 DoneWithTurn END_COMMAND COMMAND OPEN SAFE Present 479 PrintMessage 378 DoneWithTurn END_COMMAND COMMAND OPEN SAFE Present 480 PrintMessage 164 DoneWithTurn END_COMMAND COMMAND OPEN SAFE Present 481 PrintMessage 379 DoneWithTurn END_COMMAND COMMAND OPEN CLAM IsCarrying 398 PrintMessage 541 DoneWithTurn END_COMMAND COMMAND OPEN CLAM NOT present 432 Present 398 PrintMessage 540 DoneWithTurn END_COMMAND COMMAND OPEN CLAM present 432 InRoom 398 PrintMessage 160 SwapLocations 398 399 SendToRoom 438 176 PlusScore 15 DoneWithTurn END_COMMAND COMMAND OPEN OYSTER IsCarrying 399 PrintMessage 539 DoneWithTurn END_COMMAND COMMAND OPEN OYSTER NOT present 432 Present 399 PrintMessage 538 DoneWithTurn END_COMMAND COMMAND OPEN OYSTER present 432 InRoom 399 PrintMessage 161 DoneWithTurn END_COMMAND COMMAND OPEN DOOR InRoom 393 PrintMessage 162 DoneWithTurn END_COMMAND COMMAND OPEN DOOR InRoom 392 PrintMessage 347 DoneWithTurn END_COMMAND COMMAND OPEN CAGE Present 391 InRoom 502 PutInCurrentRoom 390 SwapLocations 385 391 Destroy 502 PrintMessage 306 PlusScore 10 DoneWithTurn END_COMMAND COMMAND OPEN CAGE Present 391 InRoom 507 SwapLocations 385 391 Destroy 390 PrintMessage 358 DoneWithTurn END_COMMAND COMMAND OPEN CAGE Present 391 InRoom 516 SwapLocations 385 391 Destroy 390 PrintMessage 147 DoneWithTurn END_COMMAND COMMAND OPEN CAGE Present 391 SwapLocations 385 391 PutInCurrentRoom 390 PrintMessage 331 DoneWithTurn END_COMMAND COMMAND OPEN CAGE Present 385 PrintMessage 537 DoneWithTurn END_COMMAND COMMAND PULL ROPE FlagOFF 7 AtLocation 40 OR AtLocation 44 PlusScore 10 ; give 10 points for ringing church bells TurnFlagON 7 END_COMMAND COMMAND PULL ROPE AtLocation 40 OR AtLocation 44 PrintMessage 231 DoneWithTurn END_COMMAND COMMAND PULL HANDLE Present 303 <-- vault ready to be opened ReDirectTo OPEN SAFE END_COMMAND COMMAND CLOSE COFFIN InRoom 324 SwapLocations 316 324 PrintMessage 163 ChangePassageway 10 0 DoneWithTurn (* no further action -- get next input *) END_COMMAND COMMAND CLOSE SAFE Present 302 OR Present 303 PrintMessage 165 DoneWithTurn END_COMMAND COMMAND CLOSE SAFE Present 304 SwapLocations 304 303 PrintMessage 536 DoneWithTurn END_COMMAND COMMAND CLOSE FLASK Present 368 PrintMessage 165 DoneWithTurn END_COMMAND COMMAND CLOSE FLASK Present 369 OR Present 370 PrintMessage 166 DoneWithTurn END_COMMAND COMMAND CLOSE SAFE Present 480 SwapLocations 480 479 SetVariableTo 11 0 ; safe is now closed PrintMessage 380 DoneWithTurn END_COMMAND COMMAND CLOSE SAFE AtLocation 247 PrintMessage 167 DoneWithTurn END_COMMAND COMMAND CLOSE SAFE Present 479 PrintMessage 165 DoneWithTurn END_COMMAND COMMAND CLOSE CAGE Present 385 PrintMessage 535 DoneWithTurn END_COMMAND COMMAND OIL ReDirectTo POUR OIL END_COMMAND COMMAND WATER ANY InRoom 408 OR InRoom 407 OR InRoom 406 ReDirectTo POUR WATER END_COMMAND COMMAND WATER ANY Present 308 ReDirectTo POUR WATER END_COMMAND COMMAND WATER ANY Present 402 SwapLocations 402 403 PrintMessage 328 PrintMessage 324 TurnFlagOFF 23 DoneWithTurn END_COMMAND COMMAND WATER ANY PrintMessage 304 DoneWithTurn END_COMMAND COMMAND OOPS PrintMessage 168 DoneWithTurn END_COMMAND COMMAND LOCK SAFE Present 302 PrintMessage 310 DoneWithTurn END_COMMAND COMMAND LOCK SAFE Present 304 PrintMessage 534 DoneWithTurn END_COMMAND COMMAND LOCK SAFE FlagON 14 <-- vault is still unlocked Present 303 <-- unlocked vault is here SwapLocations 303 302 <-- get the locked vault PrintMessage 169 <-- tell `em about it TurnFlagOFF 14 <-- reset the mechanism DoneWithTurn END_COMMAND COMMAND LOCK ANY NOT present 382 NOT present 348 PrintMessage 307 DoneWithTurn END_COMMAND COMMAND LOCK CAGE Present 385 OR Present 391 PrintMessage 308 DoneWithTurn END_COMMAND COMMAND LOCK KEYS Present 382 OR Present 348 PrintMessage 170 DoneWithTurn END_COMMAND COMMAND LOCK CHAIN NOT AtLocation 194 PrintMessage 533 DoneWithTurn END_COMMAND COMMAND LOCK CHAIN AtLocation 194 Present 382 Present 443 OR Present 442 PrintMessage 310 DoneWithTurn END_COMMAND COMMAND LOCK CHAIN AtLocation 194 Present 382 Present 441 Destroy 441 PutInCurrentRoom 443 PrintMessage 532 DoneWithTurn END_COMMAND COMMAND LOCK BEAR NOT AtLocation 194 PrintMessage 531 DoneWithTurn END_COMMAND COMMAND LOCK BEAR AtLocation 194 Present 382 Present 442 PrintMessage 310 DoneWithTurn END_COMMAND COMMAND LOCK BEAR AtLocation 194 Present 382 Present 441 Present 511 Destroy 441 Destroy 511 PutInCurrentRoom 442 PutInCurrentRoom 510 PrintMessage 530 DoneWithTurn END_COMMAND COMMAND UNLOCK ANY WITH ANY NOT present 382 NOT present 348 PrintMessage 307 DoneWithTurn END_COMMAND COMMAND UNLOCK CAGE WITH ANY Present 385 OR Present 391 PrintMessage 308 DoneWithTurn END_COMMAND COMMAND UNLOCK GRATE WITH ANY FlagON 24 PrintMessage 351 DoneWithTurn END_COMMAND COMMAND UNLOCK GRATE WITH ANY FlagOFF 24 AtLocation 79 UnlockIt 384 PrintMessage 529 DoneWithTurn END_COMMAND COMMAND UNLOCK GRATE WITH ANY FlagOFF 24 AtLocation 80 PrintMessage 171 DoneWithTurn END_COMMAND COMMAND UNLOCK ANY WITH ANY InRoom 509 PrintMessage 172 DoneWithTurn END_COMMAND COMMAND UNLOCK BEAR WITH ANY Present 511 PrintMessage 309 DoneWithTurn END_COMMAND COMMAND UNLOCK ANY WITH ANY Present 382 InRoom 510 SwapLocations 510 511 SwapLocations 442 443 PrintMessage 528 DoneWithTurn END_COMMAND COMMAND UNLOCK CHAIN WITH ANY Present 441 PrintMessage 309 DoneWithTurn END_COMMAND COMMAND UNLOCK CHAIN WITH ANY Present 382 InRoom 443 SwapLocations 443 441 PrintMessage 527 DoneWithTurn END_COMMAND COMMAND PRAY Present 300 FlagOFF 8 PrintMessage 526 TurnFlagON 8 PlusScore 15 ; points for praying in church with lit candle DoneWithTurn END_COMMAND COMMAND PRAY PrintMessage 525 DoneWithTurn END_COMMAND COMMAND LIGHT LAMP Present 383 Destroy 460 Destroy 461 Destroy 462 Destroy 463 Destroy 464 Destroy 465 Destroy 466 Destroy 467 END_COMMAND COMMAND LIGHT LAMP Present 301 PrintMessage 312 DoneWithTurn END_COMMAND COMMAND LIGHT LAMP NOT Present 383 PrintMessage 524 DoneWithTurn END_COMMAND COMMAND LIGHT LAMP Present 383 VariableGT 8 0 ;batteries are not dead, yet PrintMessage 312 TurnFlagON 26 SwapLocations 301 383 DoneWithTurn END_COMMAND COMMAND LIGHT LAMP Present 383 VariableEquals 8 0 ;batteries are dead PrintMessage 311 DoneWithTurn END_COMMAND COMMAND LIGHT ANY VariableEquals 5 0 PrintMessage 173 DoneWithTurn END_COMMAND COMMAND LIGHT MATCH Present 333 VariableGT 5 0 PrintMessage 523 SubtractFromVariable 5 1 VariableEquals 5 0 PrintMessage 174 Destroy 333 END_COMMAND COMMAND LIGHT MATCH DoneWithTurn END_COMMAND COMMAND LIGHT CANDLE NOT Present 311 OR VariableEquals 6 0 PrintMessage 522 DoneWithTurn END_COMMAND COMMAND LIGHT CANDLE Present 333 Present 311 VariableGT 5 0 VariableGT 6 0 PrintMessage 521 TurnCounterON 5 GetIt 300 ; player is now carrying burning candle SubtractFromVariable 5 1 SubtractFromVariable 6 1 VariableEquals 5 0 PrintMessage 174 Destroy 333 END_COMMAND COMMAND LIGHT CANDLE VariableEquals 6 0 BlankLine PrintMessage 175 Destroy 311 END_COMMAND COMMAND LIGHT CANDLE DoneWithTurn END_COMMAND COMMAND LIGHT LEAVES PrintMessage 520 DoneWithTurn END_COMMAND COMMAND EXTINGUISH CANDLE Present 300 TurnCounterOFF 5 PrintMessage 519 BlankLine Destroy 300 VariableEquals 6 0 PrintMessage 175 BlankLine END_COMMAND COMMAND EXTINGUISH CANDLE DoneWithTurn END_COMMAND COMMAND EXTINGUISH LAMP Present 301 SendToRoom 460 207 SendToRoom 461 208 SendToRoom 462 209 SendToRoom 463 210 SendToRoom 464 211 SendToRoom 465 212 SendToRoom 466 213 SendToRoom 467 214 END_COMMAND COMMAND EXTINGUISH LAMP Present 383 PrintMessage 313 DoneWithTurn END_COMMAND COMMAND EXTINGUISH LAMP Present 301 PrintMessage 313 TurnFlagOFF 26 SwapLocations 301 383 DoneWithTurn END_COMMAND COMMAND WAVE ROD NOT IsCarrying 386 PrintMessage 305 DoneWithTurn END_COMMAND COMMAND WAVE ROD Present 386 IsNoWhere 379 AtLocation 114 OR AtLocation 115 PrintMessage 176 SendToRoom 379 114 SendToRoom 380 115 DoneWithTurn END_COMMAND COMMAND WAVE ROD Present 386 IsSomeWhere 379 AtLocation 114 OR AtLocation 115 PrintMessage 177 Destroy 379 Destroy 380 DoneWithTurn END_COMMAND COMMAND WAVE ROD CounterGT 3 0 Present 386 AtLocation 283 OR AtLocation 284 PrintMessage 84 TurnCounterOFF 3 DoneWithTurn END_COMMAND COMMAND WAVE ROD CounterEquals 3 0 Present 386 AtLocation 283 OR AtLocation 284 PrintMessage 84 TurnCounterON 3 DoneWithTurn END_COMMAND COMMAND WAVE ROD Present 386 FlagON 29 AtLocation 95 OR AtLocation 265 TurnFlagOFF 29 ;crystal bridge now gone PutInCurrentRoom 396 Destroy 395 Destroy 456 LookAtRoom DoneWithTurn END_COMMAND COMMAND WAVE ROD Present 386 FlagOFF 29 AtLocation 95 OR AtLocation 265 TurnFlagON 29 ;crystal bridge has suddenly appeared SendToRoom 395 95 SendToRoom 456 265 Destroy 396 LookAtRoom DoneWithTurn END_COMMAND COMMAND WAVE FIGURE InRoom 505 OR InRoom 506 PrintMessage 178 DoneWithTurn END_COMMAND COMMAND WAVE ANY PrintMessage 327 DoneWithTurn END_COMMAND COMMAND CHOP TREE Present 412 Present 329 SwapLocations 329 387 PrintMessage 518 PlusScore 10 DoneWithTurn END_COMMAND COMMAND ATTACK RABBIT Present 518 PrintMessage 179 DoneWithTurn END_COMMAND COMMAND ATTACK GONG ReDirectTo RING GONG DoneWithTurn END_COMMAND COMMAND ATTACK BIRD Present 390 OR Present 391 PrintMessage 517 DoneWithTurn END_COMMAND COMMAND ATTACK TOAD Present 516 PrintMessage 516 DoneWithTurn END_COMMAND COMMAND ATTACK SNAKE FlagON 35 ;second COMMAND about SNAKE Present 502 PrintMessage 180 TurnFlagOFF 35 ;toggle for real message next DoneWithTurn END_COMMAND COMMAND ATTACK SNAKE FlagOFF 35 ;first COMMAND about SNAKE TurnFlagON 35 ;toggle for hint next Present 502 PrintMessage 316 DoneWithTurn END_COMMAND COMMAND ATTACK ANY NOT NOUNpresent PrintMessage 181 DoneWithTurn END_COMMAND COMMAND ATTACK ANY WITH ROD Present 386 PrintMessage 377 DoneWithTurn END_COMMAND COMMAND ATTACK ANY WITH LAMP Present 301 OR Present 383 ;lamp PrintMessage 377 DoneWithTurn END_COMMAND COMMAND ATTACK ANY WITH TRIDENT Present 432 PrintMessage 377 DoneWithTurn END_COMMAND COMMAND ATTACK ANY WITH BOTTLE Present 402 OR Present 403 OR Present 404 PrintMessage 377 DoneWithTurn END_COMMAND COMMAND KILL DJINN Present 500 PrintMessage 182 DoneWithTurn END_COMMAND COMMAND ATTACK GOBLIN Present 472 PrintMessage 183 GoToRoom 51 KillPlayer DoneWithTurn END_MESSAGE COMMAND ATTACK ROVER Present 515 PrintMessage 184 DoneWithTurn END_COMMAND COMMAND ATTACK BASILISK Present 371 OR Present 373 PrintMessage 185 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND ATTACK OGRE WITH AXE Present 517 PrintMessage 186 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND ATTACK OGRE WITH SWORD Present 517 Present 475 PrintMessage 187 SendToRoom 475 0 SendToRoom 517 0 PutInCurrentRoom 487 PlusScore 15 DoneWithTurn END_COMMAND COMMAND ATTACK OGRE Present 517 TurnFlagON 30 ;not using bare hands for attack PrintMessage 318 PromptForYES TurnFlagOFF 30 PrintMessage 188 DoneWithTurn END_COMMAND COMMAND ATTACK OGRE FlagON 30 ;not using bare hands for attack TurnFlagOFF 30 PrintMessage 189 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND ATTACK TROLL WITH AXE Present 412 Present 508 ;troll demanding money PrintMessage 359 DoneWithTurn END_COMMAND COMMAND ATTACK TROLL Present 508 PrintMessage 190 DoneWithTurn END_COMMAND COMMAND ATTACK CLAM Present 398 PrintMessage 355 DoneWithTurn END_COMMAND COMMAND ATTACK OYSTER Present 399 PrintMessage 355 DoneWithTurn END_COMMAND COMMAND ATTACK DWARF WITH SWORD Present 475 Present 503 OR Present 504 PrintMessage 354 Destroy 503 Destroy 504 DoneWithTurn END_COMMAND COMMAND ATTACK DWARF WITH AXE Present 412 Present 503 OR Present 504 PrintMessage 354 Destroy 503 Destroy 504 DoneWithTurn END_COMMAND COMMAND ATTACK DWARF Present 503 OR Present 504 TurnFlagON 30 ;not using bare hands for attack PrintMessage 318 PromptForYES TurnFlagOFF 30 BlankLine PrintMessage 317 DoneWithTurn END_COMMAND COMMAND ATTACK DWARF FlagON 30 ;not using bare hands for attack TurnFlagOFF 30 BlankLine PrintMessage 515 Destroy 503 Destroy 504 DoneWithTurn END_COMMAND COMMAND ATTACK BEAR WITH AXE Present 509 Present 412 PrintMessage 364 PutInCurrentRoom 412 DoneWithTurn END_COMMAND COMMAND ATTACK BEAR Present 509 PrintMessage 514 PrintMessage 346 DoneWithTurn END_COMMAND COMMAND ATTACK BEAR Present 511 OR Present 510 PrintMessage 346 PrintMessage 513 DoneWithTurn END_COMMAND COMMAND ATTACK BASILISK Present 372 OR Present 374 PrintMessage 191 DoneWithTurn END_COMMAND COMMAND ATTACK DRAGON Present 414 PrintMessage 191 DoneWithTurn END_COMMAND COMMAND ATTACK DRAGON WITH AXE Present 507 Present 412 PrintMessage 356 PutInCurrentRoom 412 DoneWithTurn END_COMMAND COMMAND ATTACK DRAGON Present 507 TurnFlagON 30 ;not using bare hands for attack PrintMessage 318 PromptForYES TurnFlagOFF 30 BlankLine PrintMessage 192 SwapLocations 507 414 SwapLocations 512 459 PlusScore 10 DoneWithTurn END_COMMAND COMMAND ATTACK DRAGON FlagON 30 ;not using bare hands for attack TurnFlagOFF 30 BlankLine PrintMessage 346 PrintMessage 357 DoneWithTurn END_COMMAND COMMAND ATTACK ANY PrintMessage 346 DoneWithTurn END_COMMAND COMMAND ABRACADABRA PrintMessage 512 DoneWithTurn END_COMMAND COMMAND DIG NOT Present 331 PrintMessage 193 DoneWithTurn END_COMMAND COMMAND DIG AtLocation 291 Present 494 SwapLocations 494 495 PrintMessage 511 DoneWithTurn END_COMMAND COMMAND DIG AtLocation 291 Present 495 SwapLocations 496 495 PrintMessage 510 DoneWithTurn END_COMMAND COMMAND DIG AtLocation 291 Present 496 SwapLocations 496 497 PrintMessage 509 DoneWithTurn END_COMMAND COMMAND DIG AtLocation 291 Present 497 GoToRoom 292 PrintMessage 194 DoneWithTurn END_COMMAND COMMAND DIG AtLocation 292 GoToRoom 293 TurnFlagON 49 PrintMessage 195 PlusScore 10 DoneWithTurn END_COMMAND COMMAND DIG NOT AtLocation 292 NOT AtLocation 291 PrintMessage 508 DoneWithTurn END_COMMAND COMMAND WAKE Present 371 OR Present 373 PrintMessage 56 DoneWithTurn END_COMMAND COMMAND CALM ANY PrintMessage 302 DoneWithTurn END_COMMAND COMMAND BREAK VIAL Present 486 SendToRoom 486 0 PrintMessage 138 TurnFlagON 45 END_COMMAND COMMAND BREAK VIAL FlagON 45 Present 489 PrintMessage 196 SendToRoom 489 0 END_COMMAND COMMAND BREAK VIAL FlagON 45 Present 472 SendToRoom 472 0 PrintMessage 197 END_COMMAND COMMAND BREAK VIAL FlagON 45 Present 500 PrintMessage 198 END_COMMAND COMMAND BREAK VIAL FlagON 45 Present 372 OR Present 374 PrintMessage 507 END_COMMAND COMMAND BREAK VIAL FlagON 45 FlagON 31 PrintMessage 199 Destroy 503 Destroy 504 END_COMMAND COMMAND BREAK VIAL FlagON 45 Present 508 PrintMessage 506 END_COMMAND COMMAND BREAK VIAL FlagON 45 Present 509 PrintMessage 505 END_COMMAND COMMAND BREAK VIAL FlagON 45 Present 511 OR Present 510 PrintMessage 504 END_COMMAND COMMAND BREAK VIAL FlagON 45 Present 502 PrintMessage 503 END_COMMAND COMMAND BREAK VIAL FlagON 45 Present 391 OR Present 390 PrintMessage 200 END_COMMAND COMMAND BREAK VIAL FlagON 45 Present 507 PrintMessage 201 END_COMMAND COMMAND BREAK VIAL FlagON 45 TurnFlagOFF 45 DoneWithTurn END_COMMAND COMMAND BREAK VASE Present 433 Destroy 433 PutInCurrentRoom 435 PrintMessage 373 LookAtRoom DoneWithTurn END_COMMAND COMMAND BREAK MIRROR AtLocation 180 PrintMessage 202 MinusScore 10 ;lose 10 points for dying GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND BREAK BOTTLE PrintMessage 502 DoneWithTurn END_COMMAND COMMAND BLAST ANY PrintMessage 501 DoneWithTurn END_COMMAND COMMAND GIVE FOOT TO RABBIT Present 518 Present 346 PrintMessage 203 Destroy 518 Destroy 346 DropIt 499 DoneWithTurn END_COMMAND COMMAND GIVE FOOD TO ANY Present 401 OBJECTPresent ReDirectTo FEED $OBJECT$ DoneWithTurn END_COMMAND COMMAND GIVE APPLE TO ANY Present 310 OBJECTPresent ReDirectTo FEED $OBJECT$ DoneWithTurn END_COMMAND COMMAND THROW ANY NOUNPresent (* any noun *) AtLocation 39 DestroyNOUN (* any noun *) TurnFlagON 51 PrintMessage 500 DoneWithTurn (* no further action -- get next input *) END_COMMAND COMMAND THROW ANY AT BASILISK Present 372 OR Present 374 PrintMessage 204 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND THROW ANY AT DJINN Present 500 DropNOUN PrintMessage 205 DoneWithTurn END_COMMAND COMMAND THROW OIL AT DWARF FlagON 31 PrintMessage 206 DoneWithTurn END_COMMAND COMMAND THROW WATER AT DWARF FlagON 31 PrintMessage 206 DoneWithTurn END_COMMAND COMMAND THROW ANY AT GOBLIN Present 472 PrintMessage 207 GoToRoom 51 KillPlayer DoneWithTurn END_MESSAGE COMMAND THROW FLASK AtLocation 100 Present 368 DropIt 370 Destroy 368 PrintMessage 145 DoneWithTurn END_COMMAND COMMAND THROW VIAL Present 486 ReDirectTo BREAK VIAL END_COMMAND COMMAND THROW TEETH Present 459 Present 472 PrintMessage 208 SendToRoom 459 0 SendToRoom 472 0 TurnFlagON 47 TurnCounterOFF 2 PlusScore 15 DoneWithTurn END_COMMAND COMMAND THROW ANY Present 517 ReDirectTo ATTACK OGRE WITH $NOUN$ DoneWithTurn END_COMMAND COMMAND THROW ANY AT ROVER Present 515 PrintMessage 209 DoneWithTurn END_COMMAND COMMAND THROW BEAR InRoom 508 Present 511 SwapLocations 508 418 ;troll is nowhere to be seen PrintMessage 363 TurnFlagON 25 TurnFlagOFF 22 PlusScore 10 DoneWithTurn END_COMMAND COMMAND THROW AXE Present 412 Present 503 OR Present 504 TurnFlagON 30 also flag to indicate axe or knife is being thrown ;throwing axe at dwarf PutInCurrentRoom 412 Chance 50 PrintMessage 354 TurnFlagOFF 30 also flag to indicate axe or knife is being thrown Destroy 503 Destroy 504 DoneWithTurn END_COMMAND COMMAND THROW AXE FlagON 30 also flag to indicate axe or knife is being thrown ;has already thrown axe at dwarf PrintMessage 317 PrintMessage 499 TurnFlagOFF 30 also flag to indicate axe or knife is being thrown LookAtRoom DoneWithTurn END_COMMAND COMMAND THROW AXE Present 508 PrintMessage 359 PutInCurrentRoom 412 LookAtRoom DoneWithTurn END_COMMAND COMMAND THROW AXE Present 509 Present 412 PrintMessage 364 PutInCurrentRoom 412 DoneWithTurn END_COMMAND COMMAND THROW AXE Present 507 Present 412 PrintMessage 356 PutInCurrentRoom 412 DoneWithTurn END_COMMAND COMMAND THROW AXE Present 398 OR Present 399 PrintMessage 355 DoneWithTurn END_COMMAND COMMAND THROW FOOD Present 509 Present 401 PrintMessage 365 Destroy 401 SwapLocations 509 510 ;bear becomes friendly PlusScore 10 DoneWithTurn END_COMMAND COMMAND THROW FOOD Present 508 Present 401 PrintMessage 367 DoneWithTurn END_COMMAND COMMAND THROW FOOD Present 401 Present 507 OR Present 502 PrintMessage 339 DoneWithTurn END_COMMAND COMMAND THROW FOOD Present 401 Present 503 OR Present 504 PrintMessage 340 DoneWithTurn END_COMMAND COMMAND THROW FOOD Present 390 Present 401 PrintMessage 337 DoneWithTurn END_COMMAND COMMAND THROW ANY Present 508 NOUNpointsGT 0 ;Noun is a treasure - i.e., it has value PrintMessage 498 DestroyNOUN SwapLocations 508 418 TurnFlagON 25 DoneWithTurn END_COMMAND COMMAND THROW ANY Present 508 PrintMessage 210 DoneWithTurn END_COMMAND COMMAND THROW VASE InRoom 394 Present 433 SwapLocations 394 434 Destroy 433 PrintMessage 373 PrintMessage 315 DoneWithTurn END_COMMAND COMMAND THROW VASE NOT InRoom 394 Present 433 Destroy 433 PutInCurrentRoom 435 PrintMessage 373 LookAtRoom DoneWithTurn END_COMMAND COMMAND THROW BIRD ReDirectTo RELEASE BIRD END_COMMAND COMMAND THROW ANY AtLocation 85 PrintMessage 211 SendNOUNToRoom 86 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 95 OR AtLocation 265 PrintMessage 212 SendNOUNToRoom 299 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 262 PrintMessage 211 SendNOUNToRoom 264 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 143 PrintMessage 211 SendNOUNToRoom 263 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 266 PrintMessage 213 SendNOUNToRoom 272 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 271 PrintMessage 211 SendNOUNToRoom 180 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 181 PrintMessage 211 SendNOUNToRoom 180 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 273 PrintMessage 211 SendNOUNToRoom 274 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 275 PrintMessage 213 SendNOUNToRoom 140 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 133 PrintMessage 211 SendNOUNToRoom 84 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 145 PrintMessage 214 SendNOUNToRoom 144 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 146 PrintMessage 214 SendNOUNToRoom 141 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 150 PrintMessage 215 SendNOUNToRoom 151 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 164 PrintMessage 214 SendNOUNToRoom 148 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 299 PrintMessage 216 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 169 PrintMessage 217 SendNOUNToRoom 299 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 182 PrintMessage 214 SendNOUNToRoom 129 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 110 OR AtLocation 111 PrintMessage 225 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 113 PrintMessage 214 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 184 PrintMessage 218 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 187 PrintMessage 218 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 114 PrintMessage 219 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 115 PrintMessage 219 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 102 PrintMessage 220 SendNOUNToRoom 101 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 103 PrintMessage 221 SendNOUNToRoom 206 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 106 PrintMessage 222 SendNOUNToRoom 107 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 107 PrintMessage 222 SendNOUNToRoom 108 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 108 PrintMessage 222 SendNOUNToRoom 109 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 256 PrintMessage 211 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 257 PrintMessage 211 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 258 PrintMessage 223 SendNOUNToRoom 259 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 278 PrintMessage 211 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 290 PrintMessage 224 SendNOUNToRoom 291 DoneWithTurn END_COMMAND COMMAND THROW ANY AtLocation 298 PrintMessage 219 SendNOUNToRoom 0 DoneWithTurn END_COMMAND COMMAND FEED GOBLIN Present 472 PrintMessage 226 DoneWithTurn END_MESSAGE COMMAND FEED BEAR Present 509 Present 401 OR Present 310 PrintMessage 365 Destroy 401 Destroy 310 SwapLocations 509 510 PlusScore 10 DoneWithTurn END_COMMAND COMMAND FEED BEAR NOT Present 401 PrintMessage 339 DoneWithTurn END_COMMAND COMMAND FEED TROLL Present 508 PrintMessage 367 DoneWithTurn END_COMMAND COMMAND FEED DRAGON Present 507 PrintMessage 339 DoneWithTurn END_COMMAND COMMAND FEED SNAKE Present 502 Present 391 PrintMessage 338 SwapLocations 385 391 DoneWithTurn END_COMMAND COMMAND FEED SNAKE Present 502 PrintMessage 339 DoneWithTurn END_COMMAND COMMAND FEED DWARF Present 503 OR Present 504 PrintMessage 340 DoneWithTurn END_COMMAND COMMAND FEED BIRD Present 390 OR Present 391 PrintMessage 337 DoneWithTurn END_COMMAND COMMAND FEED ANY PrintMessage 302 DoneWithTurn END_COMMAND COMMAND SWIM AtLocation 299 PrintMessage 497 BlankLine ReDirectTo DOWN END_COMMAND COMMAND SWIM PrintMessage 227 DoneWithTurn END_MESSAGE COMMAND EAT MUSHROOM Present 484 OR Present 485 Destroy 484 Destroy 485 PrintMessage 228 TurnCounterON 1 TurnFlagON 46 DoneWithTurn END_COMMAND COMMAND EAT FOOD Present 401 PrintMessage 325 Destroy 401 DoneWithTurn END_COMMAND COMMAND EAT ANY NOUNPresent NOT NOUNIsEdible PrintMessage 229 DoneWithTurn END_MESSAGE COMMAND FILL ANY NOT NOUNIsCarrying PrintMessage 305 DoneWithTurn END_COMMAND COMMAND FILL AtLocation 291 PrintMessage 287 DoneWithTurn END_COMMAND COMMAND FILL VASE Present 433 Destroy 433 PutInCurrentRoom 435 PrintMessage 496 LookAtRoom DoneWithTurn END_COMMAND COMMAND FILL PITCHER WITH WATER ReDirectTo GET WATER END_COMMAND COMMAND FILL BOTTLE FlagON 23 PrintMessage 342 DoneWithTurn END_COMMAND COMMAND FILL BOTTLE NOT Present 403 PrintMessage 341 DoneWithTurn END_COMMAND COMMAND FILL BOTTLE FlagON 41 PrintMessage 344 SwapLocations 403 402 TurnFlagON 23 DoneWithTurn END_COMMAND COMMAND FILL BOTTLE AtLocation 263 ;east pit of twopit room PrintMessage 345 SwapLocations 403 404 TurnFlagON 23 DoneWithTurn END_COMMAND COMMAND FILL BOTTLE PrintMessage 343 DoneWithTurn END_COMMAND COMMAND FILL ANY PrintMessage 495 DoneWithTurn END_COMMAND COMMAND RIDE DARWIN AtLocation 111 Present 501 PrintMessage 232 SendToRoom 501 0 GoToRoom 110 DoneWithTurn END_COMMAND COMMAND RING FlagOFF 19 AtLocation 94 PrintMessage 230 PlusScore 15 TurnFlagON 19 DoneWithTurn END_COMMAND COMMAND RING Present 363 PrintMessage 231 DoneWithTurn END_COMMAND COMMAND RING FlagOFF 7 AtLocation 40 OR AtLocation 44 PlusScore 10 ; give 10 points for ringing church bells TurnFlagON 7 END_COMMAND COMMAND RING AtLocation 40 OR AtLocation 44 PrintMessage 231 DoneWithTurn END_COMMAND COMMAND RING GONG AtLocation 111 Present 501 PrintMessage 233 DoneWithTurn END_COMMAND COMMAND RING GONG AtLocation 111 NOT Present 501 PrintMessage 234 SendToRoom 501 111 PrintMessage 233 DoneWithTurn END_COMMAND COMMAND JUMP AtLocation 56 OR AtLocation 88 OR AtLocation 90 OR AtLocation 91 OR AtLocation 92 OR AtLocation 93 OR AtLocation 39 PrintMessage 494 GoToRoom 51 DoneWithTurn END_COMMAND COMMAND JUMP CHASM InRoom 415 ;troll bridge PrintMessage 335 DoneWithTurn END_COMMAND COMMAND JUMP CHASM IsSomewhere 395 AtLocation 95 OR AtLocation 265 PrintMessage 335 DoneWithTurn END_COMMAND COMMAND JUMP ANY IsNowhere 395 AtLocation 95 OR AtLocation 265 PrintMessage 235 GoToRoom 98 MinusScore 10 KillPlayer DoneWithTurn END_COMMAND COMMAND JUMP ANY IsNowhere 415 ;troll bridge doesn't exist AtLocation 184 OR AtLocation 187 PrintMessage 235 GoToRoom 98 MinusScore 10 KillPlayer DoneWithTurn END_COMMAND COMMAND JUMP AtLocation 298 PrintMessage 50 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND JUMP AtLocation 299 ReDirectTo DOWN DoneWithTurn END_COMMAND COMMAND JUMP AtLocation 256 OR AtLocation 257 OR AtLocation 278 GoToRoom 51 PrintMessage 241 KillPlayer DoneWithTurn END_COMMAND COMMAND JUMP AtLocation 113 OR AtLocation 114 OR AtLocation 271 OR AtLocation 163 OR AtLocation 169 OR AtLocation 181 GoToRoom 51 RandomMessage 236 240 KillPlayer DoneWithTurn END_COMMAND COMMAND JUMP ANY PrintMessage 346 DoneWithTurn END_COMMAND COMMAND CLIMB ROPE AtLocation 40 BlankLine PrintMessage 493 BlankLine GoToROOM 44 DoneWithTurn END_COMMAND COMMAND CLIMB ROPE AtLocation 44 BlankLine PrintMessage 492 BlankLine GoToROOM 40 DoneWithTurn END_COMMAND COMMAND CLIMB AtLocation 259 PrintMessage 242 DoneWithTurn END_COMMAND COMMAND CLIMB ANY InRoom 408 PrintMessage 243 GoToRoom 163 DoneWithTurn END_COMMAND COMMAND CLIMB ANY InRoom 410 PrintMessage 319 GoToRoom 264 DoneWithTurn END_COMMAND COMMAND CLIMB ANY InRoom 407 PrintMessage 491 GoToRoom 262 DoneWithTurn END_COMMAND COMMAND CLIMB ANY InRoom 409 PrintMessage 319 GoToRoom 264 DoneWithTurn END_COMMAND COMMAND CLIMB ANY AtLocation 264 OR AtLocation 263 PrintMessage 490 DoneWithTurn END_COMMAND COMMAND CLIMB TREE NOT AtLocation 60 NOT AtLocation 55 AtLocation 54 OR AtLocationLT 33 PrintMessage 244 DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 110 PrintMessage 245 DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 114 NOT Present 379 PrintMessage 52 DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 114 Present 379 FlagON 22 PrintMessage 53 DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 114 Present 379 IsCarrying 487 PrintMessage 55 GoToRoom 115 DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 114 Present 379 NOT IsCarrying 487 PrintMessage 54 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 111 Present 501 PrintMessage 232 SendToRoom 501 0 GoToRoom 110 DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 111 NOT Present 501 PrintMessage 245 DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 115 NOT Present 380 PrintMessage 52 DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 115 Present 380 IsCarrying 487 NOT IsCarrying 471 PrintMessage 55 GoToRoom 114 DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 115 Present 380 IsCarrying 487 IsCarrying 471 PrintMessage 59 GoToRoom 51 KillPlayer Destroy 379 Destroy 380 DoneWithTurn END_COMMAND COMMAND CROSS AtLocation 115 Present 380 NOT IsCarrying 487 PrintMessage 54 GoToRoom 51 KillPlayer DoneWithTurn END_COMMAND COMMAND CROSS BRIDGE Present 418 AtLocation 184 ;one side of troll bridge GoToRoom 187 ;other side PutInCurrentRoom 418 PutInCurrentRoom 415 ;troll bridge PrintMessage 320 DoneWithTurn END_COMMAND COMMAND CROSS BRIDGE Present 418 AtLocation 187 ;one side of troll bridge GoToRoom 184 ;other side PutInCurrentRoom 418 PutInCurrentRoom 415 ;troll bridge PrintMessage 320 DoneWithTurn END_COMMAND COMMAND CROSS BRIDGE NOT InRoom 508 InRoom 415 ;troll bridge FlagOFF 25 ;troll can appear PutInCurrentRoom 508 PrintMessage 300 LookAtRoom DoneWithTurn END_COMMAND COMMAND CROSS BRIDGE InRoom 508 PrintMessage 360 DoneWithTurn END_COMMAND COMMAND CROSS BRIDGE InRoom 417 PrintMessage 361 DoneWithTurn END_COMMAND COMMAND CROSS BRIDGE InRoom 415 FlagON 22 PrintMessage 362 Destroy 415 ;troll bridge Destroy 508 Destroy 418 Destroy 511 TurnFlagOFF 22 SendToRoom 417 184 GoToRoom 98 MinusScore 10 SendToRoom 383 60 Destroy 301 KillPlayer DoneWithTurn END_COMMAND COMMAND CROSS BRIDGE IsNowhere 395 AtLocation 95 OR AtLocation 265 PrintMessage 336 DoneWithTurn END_COMMAND COMMAND FOLLOW STREAM AtLocation 54 PrintMessage 333 GoToRoom 73 DoneWithTurn END_COMMAND COMMAND FOLLOW STREAM AtLocation 60 PrintMessage 372 DoneWithTurn END_COMMAND COMMAND FOLLOW STREAM AtLocation 78 PrintMessage 489 DoneWithTurn END_COMMAND COMMAND FOLLOW STREAM AtLocation 73 PrintMessage 333 GoToRoom 78 DoneWithTurn END_COMMAND COMMAND FOLLOW STREAM AtLocation 78 PrintMessage 333 GoToRoom 79 DoneWithTurn END_COMMAND COMMAND FOLLOW ROAD AtLocation 54 PrintMessage 333 GoToRoom 57 DoneWithTurn END_COMMAND COMMAND FOLLOW ROAD AtLocation 57 PrintMessage 333 GoToRoom 54 DoneWithTurn END_COMMAND COMMAND FOLLOW PIRATE PrintMessage 304 PrintMessage 376 DoneWithTurn END_COMMAND COMMAND FOLLOW PROGRAMMER PrintMessage 304 PrintMessage 376 DoneWithTurn END_COMMAND COMMAND FOLLOW DWARF FlagON 31 PrintMessage 334 DoneWithTurn END_COMMAND COMMAND FOLLOW DWARF FlagOFF 31 PrintMessage 246 DoneWithTurn END_COMMAND COMMAND FOLLOW TROLL NOT InRoom 508 PrintMessage 329 ;Tell me where to go to $verb$ the $noun$ DoneWithTurn END_COMMAND COMMAND FOLLOW TROLL InRoom 508 PrintMessage 334 DoneWithTurn END_COMMAND COMMAND CLIMB ANY PrintMessage 329 ;Tell me where to go to $verb$ the $noun$ DoneWithTurn END_COMMAND COMMAND KISS TOAD Present 516 Destroy 516 PrintMessage 247 PlusScore 10 ; wizard gives you 10 points DoneWithTurn END_COMMAND COMMAND KISS ANY PrintMessage 346 DoneWithTurn END_COMMAND COMMAND SHIT PrintMessage 248 MinusScore 10 DoneWithTurn END_COMMAND COMMAND TELL TIME Present 305 ReDirectTo SAY TIME END_COMMAND COMMAND TELL TIME Present 361 ReDirectTo SAY TIME END_COMMAND COMMAND TELL TIME NOT Present 361 NOT Present 305 PrintMessage 422 DoneWithTurn END_COMMAND COMMAND TALK TO TOAD Present 516 PrintMessage 249 DoneWithTurn END_COMMAND COMMAND ASK TOAD ABOUT ANY Present 516 PrintMessage 249 DoneWithTurn END_COMMAND COMMAND TALK TO PLANT AtLocation 264 PrintMessage 488 DoneWithTurn END_COMMAND COMMAND TALK TO DWARF FlagON 31 PrintMessage 250 DoneWithTurn END_COMMAND COMMAND TALK TO FIGURE InRoom 505 OR InRoom 506 PrintMessage 251 DoneWithTurn END_COMMAND COMMAND TALK TO PIRATE PrintMessage 376 DoneWithTurn END_COMMAND COMMAND TALK TO TROLL InRoom 508 PrintMessage 252 DoneWithTurn END_COMMAND COMMAND TALK TO ANY NOUNPresent PrintMessage 487 DoneWithTurn END_COMMAND COMMAND TALK TO ANY PrintMessage 486 DoneWithTurn END_COMMAND COMMAND ATTACH CUPS TO FLOOR Present 332 AtLocation 63 IsNoWhere 337 PrintMessage 253 ChangePassageway 10 74 DropIt 337 PlusScore 15 DoneWithTurn END_COMMAND COMMAND ATTACH CUPS TO ANY Present 332 OBJECTPresent PrintMessage 254 DropIt 332 DoneWithTurn END_COMMAND COMMAND LIST ANY FlagOFF 26 FlagON 27 ;room needs light PrintMessage 303 ; so can't 485 DoneWithTurn END_COMMAND COMMAND READ TIME Present 305 OR Present 361 ReDirectTo SAY TIME END_COMMAND COMMAND READ WATCH Present 361 ReDirectTo SAY TIME END_COMMAND COMMAND READ CLOCK Present 305 ReDirectTo SAY TIME END_COMMAND COMMAND READ SIGN AtLocation 88 PrintMessage 484 DoneWithTurn END_COMMAND COMMAND READ SIGN FlagOFF 4 AtLocation 42 PrintMessage 255 PlusScore 10 TurnFlagON 4 DoneWithTurn END_COMMAND COMMAND READ SIGN FlagON 4 AtLocation 42 PrintMessage 255 DoneWithTurn END_COMMAND COMMAND READ DISK AtLocation 63 Present 335 PrintMessage 256 BlankLine PrintMessage 384 PlusScore 10 DoneWithTurn END_COMMAND COMMAND READ DIARY FlagOFF 18 Present 351 (* Witt's Diary *) PrintMessage 384 TurnFlagON 18 DoneWithTurn END_COMMAND COMMAND READ DIARY FlagON 18 Present 351 (* Witt's Diary *) RandomMessage 385 413 DoneWithTurn END_COMMAND COMMAND READ SIGN AtLocation 63 PrintMessage 257 DoneWithTurn END_COMMAND COMMAND READ SIGN FlagON 2 Present 457 PrintMessage 384 DoneWithTurn END_COMMAND COMMAND READ SIGN FlagOFF 2 Present 457 PrintMessage 258 TurnFlagON 2 DoneWithTurn END_COMMAND COMMAND READ GUIDEBOOK FlagOFF 17 Present 364 PrintMessage 384 TurnFlagON 17 DoneWithTurn END_COMMAND COMMAND READ GUIDEBOOK FlagON 17 Present 364 RandomMessage 385 413 DoneWithTurn END_COMMAND COMMAND READ ANY AtLocation 61 TurnFlagOFF 37 ;revoke secret words TurnFlagON 36 ;programmer is angry PrintMessage 374 MinusScore 25 ;That will teach you GoToRoom 120 ;Pirate's maze - just south of Pirate's den DoneWithTurn END_COMMAND COMMAND READ COMPASS Present 359 ReDirectTo EXAMINE COMPASS DoneWithTurn END_COMMAND COMMAND READ OYSTER NOUNpresent PrintMessage 259 DoneWithTurn END_COMMAND COMMAND READ ANY FlagON 27 NOT Present 301 PrintMessage 483 DoneWithTurn END_COMMAND COMMAND EXAMINE ANY AtLocation 61 TurnFlagOFF 37 ;revoke secret words TurnFlagON 36 PrintMessage 374 MinusScore 25 ;That will teach you GoToRoom 120 ;Pirate's maze - just south of Pirate's den DoneWithTurn END_COMMAND COMMAND EXAMINE SCEPTRE Present 470 DescribeThing 471 DoneWithTurn END_MESSAGE COMMAND EXAMINE CANE Present 518 PrintMessage 260 DoneWithTurn END_COMMAND COMMAND EXAMINE WIRE FlagOFF 3 AtLocation 75 DescribeThing 360 BlankLine PrintMessage 482 DropIt 361 TurnFlagON 3 DoneWithTurn END_COMMAND COMMAND EXAMINE WIRE FlagON 3 AtLocation 75 DescribeThing 360 DoneWithTurn END_COMMAND COMMAND EXAMINE MATCHES Present 333 VariableEquals 5 1 PrintMessage 481 DoneWithTurn END_COMMAND COMMAND EXAMINE CANDLE Present 300 DescribeThing 300 DoneWithTurn END_COMMAND COMMAND EXAMINE CANDLES Present 311 VariableEquals 6 1 PrintMessage 480 DoneWithTurn END_COMMAND COMMAND EXAMINE CANDLES Present 311 DescribeThing 311 DoneWithTurn END_COMMAND COMMAND EXAMINE DRAWER AtLocation 72 (* Witt's Office *) PrintMessage 421 DoneWithTurn END_COMMAND COMMAND EXAMINE COMPASS AtLocation 296 Present 359 PrintMessage 263 TurnFlagON 48 DoneWithTurn END_COMMAND COMMAND EXAMINE COMPASS Present 359 RandomMessage 261 264 DoneWithTurn END_COMMAND COMMAND EXAMINE STREAM AtLocationLT 12 PrintMessage 265 DoneWithTurn END_MESSAGE COMMAND EXAMINE STREAM AtLocation 60 PrintMessage 372 DoneWithTurn END_COMMAND COMMAND EXAMINE STREAM AtLocation 73 OR AtLocation 54 PrintMessage 266 DoneWithTurn END_COMMAND COMMAND EXAMINE STREAM AtLocation 78 PrintMessage 479 DoneWithTurn END_COMMAND COMMAND EXAMINE BUILDING AtLocation 54 PrintMessage 267 DoneWithTurn END_COMMAND COMMAND EXAMINE TREE NOT AtLocation 60 NOT AtLocation 55 AtLocation 54 OR AtLocationLT 33 PrintMessage 268 DoneWithTurn END_COMMAND COMMAND EXAMINE GRATE AtLocation 64 OR Present 341 DescribeThing 341 DoneWithTurn END_COMMAND COMMAND EXAMINE GRATE AtLocation 79 OR AtLocation 80 OR AtLocation 289 PrintMessage 269 DoneWithTurn END_COMMAND COMMAND EXAMINE CAGE Present 391 PrintMessage 270 DoneWithTurn END_COMMAND COMMAND EXAMINE CHASM AtLocation 95 OR AtLocation 265 OR AtLocation 184 OR AtLocation 187 OR AtLocation 39 PrintMessage 271 DoneWithTurn END_COMMAND COMMAND EXAMINE MIST PrintMessage 272 DoneWithTurn END_COMMAND COMMAND EXAMINE MAZE AtLocation 178 ;vending machine maze OR AtLocation 183 OR AtLocationGT 194 AtLocationLT 54 PrintMessage 273 DoneWithTurn END_COMMAND COMMAND EXAMINE MAZE AtLocationGT 277 ;pirate's maze AtLocationLT 133 PrintMessage 273 DoneWithTurn END_COMMAND COMMAND EXAMINE CAVE AtLocationGT 81 ;in cave AtLocationLT 54 PrintMessage 274 DoneWithTurn END_COMMAND COMMAND EXAMINE ROAD AtLocation 57 OR AtLocation 54 PrintMessage 275 DoneWithTurn END_COMMAND COMMAND EXAMINE MINOTAUR AtLocation 117 DescribeThing 381 DoneWithTurn END_COMMAND COMMAND EXAMINE YACHT Present 365 SwapLocations 365 366 DescribeThing 366 DoneWithTurn END_COMMAND COMMAND EXAMINE SCULPTURE Present 488 RandomMessage 276 285 END_COMMAND COMMAND EXAMINE BRIDGE AtLocation 5 OR AtLocation 8 OR AtLocation 9 OR AtLocation 24 PrintMessage 286 DoneWithTurn END_COMMAND COMMAND EXAMINE WATER AtLocation 291 PrintMessage 287 DoneWithTurn END_COMMAND COMMAND EXAMINE WATCH Present 361 DescribeThing 361 BlankLine ReDirectTo SAY TIME END_COMMAND COMMAND EXAMINE CLOCK Present 305 DescribeThing 305 BlankLine ReDirectTo SAY TIME END_COMMAND COMMAND SMELL ROSE Present 309 FlagOFF 6 PlusScore 10 ; give 10 points for smelling the beautiful rose TurnFlagON 6 END_COMMAND COMMAND SMELL ROSE Present 306 OR Present 309 PrintMessage 478 DoneWithTurn END_COMMAND COMMAND SMELL ANY PrintMessage 477 DoneWithTurn END_COMMAND COMMAND FOO AtLocation 289 ;playing "end game" TurnFlagOFF 50 ; i.e., "wrong" secret word END_COMMAND COMMAND FOO Present 479 PrintMessage 382 SetVariableTo 11 2 ; safe is now fused shut TurnCounterON 4 DoneWithTurn END_COMMAND COMMAND FEE AddToVariable 9 1 NOT VariableEquals 9 4 ;Not to 4 yet PrintMessage 314 DoneWithTurn END_COMMAND COMMAND FOO VariableEquals 9 4 ;OK - done with sequence AtLocation 165 Present 430 PrintMessage 314 SetVariableTo 9 0 ;Reset counter DoneWithTurn END_COMMAND COMMAND FOO VariableEquals 9 4 ;OK - done with sequence NOT AtLocation 165 Present 430 DropIt 431 Destroy 430 PrintMessage 476 SetVariableTo 9 0 ;Reset counter DoneWithTurn END_COMMAND COMMAND FOO VariableEquals 9 4 ;OK - done with sequence IsNowhere 430 Destroy 431 SendToRoom 430 387 ; new place to put eggs PrintMessage 288 SetVariableTo 9 0 ;Reset counter TurnFlagON 21 ; Player has got eggs back via magic words PlusScore 15 DoneWithTurn END_COMMAND COMMAND FOO VariableEquals 9 4 ;OK - done with sequence PrintMessage 314 SetVariableTo 9 0 ;Reset counter DoneWithTurn END_COMMAND COMMAND HELP AtLocation 39 FlagON 51 TurnFlagOFF 51 PlusScore 10 PrintMessage 289 DoneWithTurn (* no further action -- get next input *) END_COMMAND COMMAND HELP AtLocationGT 206 AtLocationLT 215 PrintMessage 290 DoneWithTurn END_COMMAND COMMAND HELP ANY AtLocation 171 OR AtLocation 172 PrintMessage 475 PromptForYes PrintMessage 366 PromptForYes TurnFlagON 30 also numerous temporary other uses ;hint has been rejected - so far PrintMessage 352 PrintMessage 298 PromptForYes TurnFlagOFF 30 also numerous temporary other uses ;hint has been accepted PrintMessage 291 MinusScore 5 DoneWithTurn END_COMMAND COMMAND HELP ANY FlagOFF 40 ;maze hint has not been given, yet AtLocation 178 ;vending machine maze OR AtLocation 183 OR AtLocationGT 194 AtLocationLT 54 PrintMessage 292 TurnFlagON 40 ;hint has been given DoneWithTurn END_COMMAND COMMAND HELP ANY FlagON 40 ;maze hint has been given AtLocation 178 ;vending machine maze OR AtLocation 183 OR AtLocationGT 194 AtLocationLT 54 PrintMessage 323 DoneWithTurn END_COMMAND COMMAND HELP ANY FlagOFF 40 ;maze hint has not been given, yet AtLocationGT 277 ;pirate's maze AtLocationLT 133 PrintMessage 292 TurnFlagON 40 ;hint has been given DoneWithTurn END_COMMAND COMMAND HELP ANY FlagON 40 ;maze hint has been given AtLocationGT 277 ;pirate's maze AtLocationLT 133 PrintMessage 323 DoneWithTurn END_COMMAND COMMAND HELP ANY AtLocation 179 PrintMessage 474 PromptForYes PrintMessage 366 PromptForYes TurnFlagON 30 also numerous temporary other uses ;hint has been rejected - so far PrintMessage 352 PrintMessage 298 PromptForYes TurnFlagOFF 30 also numerous temporary other uses ;hint has been accepted PrintMessage 473 MinusScore 5 DoneWithTurn END_COMMAND COMMAND HELP ANY FlagON 30 also numerous temporary other uses ;hint was rejected TurnFlagOFF 30 also numerous temporary other uses PrintMessage 332 DoneWithTurn END_COMMAND COMMAND TURN HANDLE FlagON 14 <-- vault is still unlocked Present 303 <-- unlocked vault is here ReDirectTo OPEN SAFE END_COMMAND COMMAND TURN HANDLE FlagON 14 <-- combination is correct Present 302 <-- locked vault is here SwapLocations 302 303 <-- get the unlocked vault PrintMessage 293 <-- tell `em about it DoneWithTurn END_COMMAND COMMAND TURN DIAL FlagOFF 11 <-- no right answers yet, seeking first number FlagOFF 12 FlagOFF 13 AskQuestion 1 AnswerIsCorrect <-- player turned the dial to the right GetNumberInput 0 99 <-- get his number PrintMessage 84 NumberEquals 7 <-- First number of combination (RIGHT) <-- if it's the correct number TurnFlagON 11 <-- set the flag that he got it correctly DoneWithTurn END_COMMAND COMMAND TURN DIAL FlagON 11 <-- player has the first number right FlagOFF 12 <-- seeking second number FlagOFF 13 <-- not ready for third number yet AskQuestion 1 AnswerIsWrong <-- player turned the dial to the left GetNumberInput 0 99 <-- get his number PrintMessage 84 NumberEquals 20 <-- Second number of combination (LEFT] <-- if it's the correct number TurnFlagON 12 <-- set the flag that he got it correctly DoneWithTurn END_COMMAND COMMAND TURN DIAL FlagON 11 <-- player has the first number right FlagON 12 <-- and the second number right FlagOFF 13 <-- seeking third number AskQuestion 1 AnswerIsCorrect <-- player turned the dial to the right GetNumberInput 0 99 <-- get his number NumberEquals 43 <-- Third number of combination (RIGHT) <-- if it's the correct number TurnFlagON 13 <-- set the flag that he got it correctly TurnFlagON 14 <-- tell the program the vault's unlocked PrintMessage 472 SwapLocations 302 303 DoneWithTurn END_COMMAND COMMAND TURN DIAL FlagOFF 11 <-- no right answers yet, seeking first number AnswerIsWrong <-- player turned the dial to the left GetNumberInput 0 99 <-- get his number and fall thru END_COMMAND COMMAND TURN DIAL FlagON 11 <-- player has first number correct FlagOFF 12 <-- and is seeking the second number AnswerIsCorrect <-- player turned the dial to the right GetNumberInput 0 99 <-- get his number and fall thru END_COMMAND COMMAND TURN DIAL FlagOFF 13 <-- did not get combination right TurnFlagOFF 12 <-- reset all the number flags TurnFlagOFF 11 <-- and let player start from scratch again PrintMessage 84 DoneWithTurn END_COMMAND COMMAND TURN LIGHT PrintMessage 294 DoneWithTurn END_COMMAND COMMAND QUIT FlagOn 10 DoneWithTurn END_COMMAND COMMAND QUIT PrintMessage 295 PromptForYes (* Get YES or NO answer from keyboard *) PrintMessage 296 EndGame (* OK, player entered YES -- so let's quit *) TurnFlagON 10 ReDirectTo SCORE END_COMMAND COMMAND QUIT TurnFlagOFF 10 PrintMessage 297 BlankLine ReDirectTo LOOK END_COMMAND COMMAND SCORE ScoreLT 101 BlankLine PrintMessage 471 END_COMMAND COMMAND SCORE ScoreLT 201 ScoreGT 100 BlankLine PrintMessage 470 END_COMMAND COMMAND SCORE ScoreLT 301 ScoreGT 200 BlankLine PrintMessage 469 END_COMMAND COMMAND SCORE ScoreLT 401 ScoreGT 300 BlankLine PrintMessage 468 END_COMMAND COMMAND SCORE ScoreLT 501 ScoreGT 400 BlankLine PrintMessage 467 END_COMMAND COMMAND SCORE ScoreLT 751 ScoreGT 500 BlankLine PrintMessage 466 END_COMMAND COMMAND SCORE ScoreLT 901 ScoreGT 750 BlankLine PrintMessage 465 END_COMMAND COMMAND SCORE ScoreLT 1000 ScoreGT 900 BlankLine PrintMessage 464 END_COMMAND COMMAND SCORE ScoreEquals 1000 BlankLine PrintMessage 463 END_COMMAND COMMAND SCORE BlankLine FlagOn 10 ReDirectTo QUIT END_COMMAND